
Симонович
7 год назад
Составьте программу которая вычисляет сумму натуральных чисел от 10 до 15 и выводит на экран результат
ОТВЕТЫ

Neladamch
Aug 14, 2019
Var a,sum:integer;
begin
sum:=0;
for a:=10 to 15 do begin
sum:=sum+a;
end;
write(сумма = ,sum);
end.
begin
sum:=0;
for a:=10 to 15 do begin
sum:=sum+a;
end;
write(сумма = ,sum);
end.
87