Вывести на экран массив чисел первый элемент которого равен м в котором каждый следующий элемент больше предыдущего на к числа м и к вводятся с клавиатуры

Question

Ленюся

15 октября, 09:15

+2

Ответы (1)

Знаете ответ?

Мартимьян · Answer 1

Var k, m:real;

begin

readln (m) ;

readln (k) ;

for var i:=0 to 20 do write ('[', m+i*k,'] ') ;

end.