Вход
Регистрация
О проекте Как заработать?
52

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

21 марта 2024

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

категория: информатика
ответить
в избранное



39

var i: integer; beginfor i: =1 to 1000 doif (i mod 3=0) or (i mod 7=0) then write (i); end.

комментировать
в избранное отблагодарить
Знаете ответ?
Задайте свой вопрос


Смотрите также:
Дан 2-х мерный 5*5 массив целых чисел. В зависимости от введенной буквы…
Видеопамять имеет объем, в котором может хранится 8-цветное изображение размером…
Вычислите частичную сумму ряда S=1+1/2+1/4+1/8+… вычисления прекратите, когда модуль…
Написать программу на С +. Дана целочисленная квадратная матрица произвольной…
В одной книге было написано 100 следующих утверждений. «В этой книге ровно одно…
Ученик собирался на вечер, когда погас свет в комнате, где в ящике шкафа лежали…
Задание для практической работы в MS Excel: В пункт приема металлолома прибыл…
Написать программу на языке Paskal Заданы диаметр круга D и сторона квадрата А.…
Из произведения 4785 и 302 вычесть 45 в кубе. Результат разделить на 50.
27400
Алгебра
14821
Английский язык
14215
Биология
7368
Другой
719
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11817
История
23331
Химия
15992
Литература
73118
Математика
8151
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...