Предмет:
ИнформатикаАвтор:
daphneshortvar a,i,k,b,sum:integer;
begin
read(a,b);
for i:=a to b do begin
sum:=sum+i;
end;
write(sum);
end.
Автор:
braniacxx2iprogram Hello;
var i,summ,a,b:integer;
begin
summ := 0;
readln(a);
readln(b);
for i:= a to b do:
summ = summ + i;
end;
writeln(summ);
end.
Автор:
harrisonlawrenceДобавить свой ответ
Предмет:
ИсторияАвтор:
patriciauyxfОтветов:
Смотреть
Предмет:
Русский языкАвтор:
abigailvx9zОтветов:
Смотреть
Предмет:
БиологияАвтор:
kayleighrxsaОтветов:
Смотреть
Предмет:
МатематикаАвтор:
hillaryorrОтветов:
Смотреть