дана последовательность чисел, заканчивающихся нулем. Создайте программу, которая вычисляет сумму чисел без использования цикла. Например, 1 7 9 0 = 17

Nukaka9l Nukaka9l    2   06.04.2021 15:21    1

Ответы
magnatca magnatca  06.05.2021 15:22

Pascal:

var a,s:integer;

label enterValue;

begin

   s := 0;

   enterValue:

   write('Введите число: '); readln(a);

   if a <> 0 then begin

       s := s + a;

       goto enterValue;

   end;

   write('Сумма чисел равна: ', s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика