Ответы на вопрос:
Var a,b,i: integer; begin; readln(a,b); for i: =a to b do if (i mod 10 = 3) or (i mod 7 = 0) then writeln(i); end.
Популярно: Информатика
-
Опишите процесс сортировки базы данных, созданной средствами языка Паскаль...
lub327.06.2020 15:06 -
Установіть відповідність між елементами таблиці реляційної базі даних та...
yroyakap0doki27.11.2020 04:18 -
Виконати якісний аналіз розміру зони дії безпроводової мережі від відношення...
tatyankasas10.09.2022 07:50 -
Программирование. Напишите программу в Turbo Pascal....
KseniaSamarskaia1507.07.2021 20:11 -
Определите количество цифр в двоичной записи десятичного числа: 1+1 +2 +...
evaboyko04.01.2021 01:41 -
Определите значение переменной c после выполнения следующего фрагмента программы:...
aaskarova200430.04.2020 17:21 -
Для чого використовуються моделі?...
bati999926.07.2020 07:36 -
Запишите прямой код числа 33 в 8-разрядной формы со знаком...
дизззи14.01.2022 03:17 -
Алгоритм получения слова робот...
tamila2002саша200422.03.2023 13:01 -
Произвести следующую обработку 15 вещественных чисел: найти количество отрицательных...
Пикачу111111111129.10.2022 17:56