smail666
Опубликовано 6 лет назад по предмету Информатика от smail666


вывести на экран все числа делящиеся на 3 или на 7 в промежутке от 1 до 1000

  1. Ответ
    Ответ дан Antothy

    var i:integer;

    begin

    for i:=1 to 1000 do

    if (i mod 3=0) or (i mod 7=0) then write(i);

    end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц