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

Question

Информатика

Эвелинка

28 марта, 21:18

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

+3

Ответы (2)

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

Левонтий · Answer 1

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.

Любаха · Answer 2

Var a, b, sum:integer;

begin

readln (a, b) ;

for b:=b+1 to a do

sum:=sum+b;

writeln (sum) ;

end.