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

Question

Информатика

Ярослав

21 октября, 06:16

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

+3

Ответы (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.