Question

составьте программу,которая вычисляет сумму натуральных чисел от 10 до 15 и выводит на экран результат

Answer 1

uses crt;
var i,sum: integer;
begin

for i:=10 to 15 do
begin
sum:=sum+i;
end;
writeln(sum);
end.