Программа получает на вход натуральные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается нулем. (a=0 признак окончания ввода, ноль не входит в последовательность). Программа должна вывести количество и сумму всех чисел последовательности.

Question

Натаха

30 ноября, 18:12

+3

Ответы (1)

Знаете ответ?

Злата · Answer 1

Program mor; var n, s: integer; beginn: = 1; s: = 5; while s< = 365 dobegins:=s+37; n:=n*2; end; writeln (n) end.