Написать программу на Паскале
Ответы
В первый час работы рабочий изготавливает а деталей, за каждый последующий час - нa d деталей больше, чем за предыдущий. Разработайте программу, которая подсчитывает, сколько деталей изготовил рабочий за К часов работы.
Нам нужно ввести целочисленные переменные a, d, K и вывести ответ.
Заводим две переменные: s - суммарное количество деталей, изготовленных за первые часы работы, и next - количество деталей, которых рабочий изготовит в следующий час.
Затем в цикле обрабатываем каждый час: увеличиваем s на next и обновляем значение next.
В конце выводим значение s.
Код (Pascal):
var
a, d, K, i, s, next: integer;
begin
read(a, d, K);
s := 0;
next := a;
for i := 1 to K do
begin
s := s + next;
next := next + d;
end;
write(s)
end.
Пример ввода:
1 1 8
Пример вывода:
36
(Пояснение: 1 + 2 + 3 + 4 + 5 + 6 + 7 + 8 = 36)