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

Question

Информатика

Дионина

23 мая, 10:44

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

+3

Ответы (1)

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

Теодор · Answer 1

Program zuevyuliya;

var a, sum, b:integer;

begin

write ('a='); readln (a);

write ('b='); readln (b);

for a:=a to b do

inc (sum, a);

writeln ('sum=', sum);

end.