Даны натуральные числа А и В (В<А). написать программу, выводящую на экран сумму натуральных чисел от В до А, включая В и А.

Question

Информатика

Абрам

18 марта, 12:07

Даны натуральные числа А и В (В<А). написать программу, выводящую на экран сумму натуральных чисел от В до А, включая В и А.

+1

Ответы (2)

Знаете ответ на вопрос?

Дионина · Answer 1

Var a, b, sum:integer;

begin

readln (a, b) ;

for b:=b+1 to a do

sum:=sum+b;

writeln (sum) ;

end.

Валяка · Answer 2

Uses crt; const h=10; var a, b, S: integer;

begin write ('A = ') ; readln (a) ; write ('B = ') ; readln (b) ; S:=0; while ba+1 do begin S:=S+b; inc (b) ; end; writeln ('Сумма - ', S) ; end.