Решите ! с 1 циклом for в первый час роботы рачий изготавливает 20 деталей,за каждый последующий час на 3 деталей больше,чем на предыдущий.подсчитать,сколько деталей рабочий изготовит за 8 часов работы.

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

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.