Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих данного заданного числа n. напишите программу на паскале. p.s. тема урока- программирование циклов

strunets1 strunets1    2   20.05.2019 03:20    0

Ответы
yuliaatamanchuk yuliaatamanchuk  13.06.2020 10:15

var sum,n,i:integer;

begin

readln(n);

sum:=0;

for i:=1 to n do

    sum:=sum+i;

writeln(sum);

readln;

end.

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