Question

написать программу, которая считает и выводит сумму чисел от 1 до 105. ответ выводит в виде : "Сумма чисел от 1 до 105=..."​

Answer 1

Ответ:

program summa;

var n, S: integer;

begin

for n:=1 to 105 do

begin

S:=S+n;

end;

writeln('Сумма чисел от 1 до 105=', S);

end.

Объяснение: