Используя алгоритмический язык, составить алгоритм суммы 10 натуральных чисел. (желательно паскаль) ,!

goodanonim goodanonim    3   02.10.2019 17:50    0

Ответы
LutsenkoRodion LutsenkoRodion  09.10.2020 12:12

declare Sum

declare i

Sum = 0

for i = 1 to 10

begin

Sum += i

i++

end

Print Sum

ПОКАЗАТЬ ОТВЕТЫ
спецназ8 спецназ8  09.10.2020 12:12

program summation;

var i, summa: Word;

begin

summa := 0;

for i := 1 to 10 do  

summa := summa + i;

WriteLn('l + 2 + .+ 10 = ', summa);

end.

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