Ввести 100 членов арифметической прогрессии( каждое число прибавляется на 3)

Ответы:
Аделия Волошина
08-01-2015 01:50

var A, i, k, max: integer;begini := 3;max := 100;for k := 1 to max do beginA := A + i;write( A, );end;end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Alik Komarov

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Ввести 100 членов арифметической прогрессии( каждое число прибавляется на 3)» от пользователя Alik Komarov в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!