Задать вопрос
19 мая, 11:41

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

+3
Ответы (1)
  1. 19 мая, 12:00
    0
    Var A, i, k, max: integer;

    begin

    i : = 3;

    max : = 100;

    for k : = 1 to max do begin

    A : = A + i;

    write (A, ' ') ;

    end;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Ввести 100 членов арифметической прогрессии (каждое число прибавляется на 3) ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы