Составить программу нахождения суммы целых чисел из промежутка ab. Язык Pascal!

Question

Информатика

Изот

25 июля, 07:43

Составить программу нахождения суммы целых чисел из промежутка ab. Язык Pascal!

+5

Ответы (1)

Знаете ответ?

Афанасия · Answer 1

Допустим, что a и b входят в этот промежуток.

program test;

var a, b, sum, i: integer;

begin

write ('Enter two integers:') ;

readln (a, b) ;

sum:=0;

for i:=a to b do

sum:=sum+i;

write ('Sum = ', sum) ;

readln;

end.