profile
Опубликовано 6 лет назад по предмету Информатика от Kurysu

Разработать программу для решения задачи: в первый час работы рабочий изготавливает a деталей, за каждый последующий час — на d деталей больше, чем предыдущий. Разработайте программу, которая подсчитает, сколько деталей изготовил рабочий за 8 часов работы. Зафиксируйте свои действия на каждом из этапов решения этой задачи.

  1. Ответ
    Ответ дан Nikita19010
    var
       a,d,i:integer;
    begin
       readln(a,d);
       for i:=1 to 8 do
          begin
              writeln('in ',i,' hour = ',a);
              a:=a+d;
          end;
    end;
Самые новые вопросы