Вывести на экран массив чисел первый элемент которого равен м в котором каждый следующий элемент больше предыдущего на к числа м и к вводятся с клавиатуры
про знаки препинания (и запятые в частности) что-нибудь слышал? С 3-го раза только понял, что написано
Var k,m:real; begin readln(m); readln(k); for var i:=0 to 20 do write('[',m+i*k,'] '); end.