Предмет: Информатика, автор: Аноним

Самостоятельно составьте программу подсчёта суммы всех целых чисел от 10 до 500 включительно. S=((5*b+d*(n-1))*n)/5

Ответы

Автор ответа: disenyashkov
1

var i,s:integer;

begin

s:=0;

for i:=10 to 500 do

s:=s+i;

write('s=', s);

end.

Похожие вопросы
Предмет: Химия, автор: katya5718