Составить программу: Получить первые k членов арифметической прогрессии с первым членом,равным сорока ,и разностью минус 5.
Составить программу:
Получить первые k членов арифметической прогрессии с первым членом,равным сорока ,и разностью минус 5.
Ответ(ы) на вопрос:
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.
Не нашли ответ?
Похожие вопросы