Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
мальчуган2
30.12.2021 09:17 •
Информатика
Назовем число клевым, если его предпоследняя цифра равна 7. по данным двум числам а и b выведите все клевые числа от a до b в порядке возрастания. ввод вывод 70 72 70 71 72 ввод вывод 160 175 170 171 172 173 174 175 pascal abc
Показать ответ
Ответ:
Рита460
04.10.2020 23:01
Var
a,b,i:integer;
begin
readln(a,b);
for i:=a to b do
if (i mod 100) div 10 = 7 then write(i,' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
tigranpesoz3twi
26.12.2021 07:45
С клавиатуры вводятся три числа. Выведите наибольшее из данных чисел. Почему не работает оператор else? и как исправить, что бы при вводе одинаковых чисел, вывелось...
djjegsdhssbsv
02.09.2020 00:08
за ответ на задачу по информатике!...
salixova
23.03.2021 10:35
Что Это? -пересылает данные, поступившие по одному из каналов связи, в каждый из присоединенных каналов; - направляет данные только по одному каналу, определяя маршрут,...
макс3113
20.12.2021 04:31
Текст длиной 4096 символов занимает в памяти 4 Кбайта. Определите наибольшее возможное количество символов в алфавите. (Дано, формула, решение)....
FRAIS11
19.05.2021 01:44
От станции до озера S км. Туристы, направляясь от станции к озеру, полтора часа шли пешком со скоростью А км/час, а затем сели на попутную машину, которая ехала со...
AlinaAlina707
05.11.2022 06:52
Построй и заполни таблицу: Самые известные роботы в мире№Название роботыСтранаНазначение роботы...
Aigulshak
13.01.2023 04:53
Напечатайте в порядке возрастания первые 1000 чисел, которые не имеют простых делителей, кроме 2, 3, 5. (2, 3, 4, 5, 6, 8, 9, 10, 12, …).(программа в Паскаль. )Может...
slia1984
01.01.2023 17:40
Написать основные элементы окна программы?...
AlyonaYarmak
19.12.2022 05:17
Определи, какие из файлов сжимаются лучше всего. monitor.jpg computer.doc computer money.mxe monitor money...
dashagorlova2
05.01.2021 12:58
ответить на вопросы Топология - это 1. характеристика линий связи; соединения компьютеров в сети (геометрическая схема соединения); 3. проектная документация на разработку...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,i:integer;
begin
readln(a,b);
for i:=a to b do
if (i mod 100) div 10 = 7 then write(i,' ');
end.