Question

составить программу:
Получить первые k членов арифметической прогрессии с первым членом,равным сорока ,и разностью минус 5.

Answer 1

PascalABC
beginvar x:=40;var k:integer;write('Введите k. Вы ввели ');read(k);write(x);for var i:=1 to k dobeginx+=5;write(' ',x);end;end.

Answer 2

begin
var x:=40;
var k:integer;
write('Введите k. Вы ввели ');
read(k);
write(k);
for var i:=1 to k do
begin
k+=5;
write('',k);
end;
end.

Answer 3

Почему-то он ввел без новых строк

Answer 4

k+=5; что это означает?