Информатика , цикл while: найти сумму целых чисел в диапазоне от а до в

kolomietslina kolomietslina    3   21.09.2019 07:20    1

Ответы
bakinka005 bakinka005  04.08.2020 13:12
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (a,b):=ReadInteger2;
var s:=0;
while a<=b do 
begin
s+=a;
inc(a);
end;
write('сумма: ',s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика