Составить алгоритм и программу для вывода первых членов арифметической прогрессии с основанием а и разницей d.

Question

Анночка

11 января, 17:18

+5

Ответы (1)

Знаете ответ на вопрос?

Даша · Answer 1

Var

a, d: real;

i, n: integer;

begin

read (a, d, n) ;

for i : = 1 to n do

writeln ('a[', i, '] = ', a + d * (i - 1)) ;

end.