Question

Решите задачу ПОЖАЛУЙСТА!С 1 циклом For В первый час роботы рачий изготавливает 20 деталей,за каждый последующий час на 3 деталей больше,чем на предыдущий.Подсчитать,сколько деталей рабочий изготовит за 8 часов работы.

Answer 1

Ответ -244
решение:
20 +23+26+29+32+35+38+41=244

Answer 2

Var
a,b,c:integer;
begin
a:=20;
c:=0;
for b:=1 to 8 do begin
c:=c+a;
a:=a+3;
end;
write('Количество деталей=',c);
end.