Подставить код Паскаля под нужные значения. Код (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)

natab02    2   30.11.2020 15:20    1