Есть ответ 👍

Дана непустая последовательность чисел оканчивающаяся нулем. найти: а) сумму всех чисел последовательности, б) кол-во всех чисел последовательности.решить через pascal abc через repeat,for или while

121
167
Посмотреть ответы 2

Ответы на вопрос:

Dasha222
4,7(58 оценок)

Var a, s, n: integer; begin n: =0; s: =0; repeat readln(a); inc(n); inc(s, a); until a = 0; writeln('сумма: ', s); writeln('количество: ', n); end.

I=k*b n=2(в степени b) 16=2(в степени 4) i= 47*4=188 ответ: 188бит

Популярно: Информатика