Вычислить сумму 10 натуральных чисел, вводимых с клавиатуры.Program Demofor1; Var S, P, I: integer;…

Question

87

Вычислить сумму 10 натуральных чисел, вводимых с клавиатуры.Program Demofor1; Var S, P, I: integer; BeginFor I: =… to … doBeginWriteln (‘Введите число’) P); S: =S+… ; End; Writeln (‘ Сумма равна’,…); End.

в избранное ссылка

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

studasd · Accepted Answer

36

studasd

11 марта 2023

Program Demofor1; Var S, P, I: integer; BeginFor I: =0 to 9 doBeginWriteln ('Введите число'); readln (p); S: =S+p; End; Writeln (' Сумма=', s); End.

комментировать

в избранное ссылка отблагодарить