Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vikaos01Vi
28.02.2022 03:00 •
Информатика
Составьте программу , выводящию на экран все двухзначные числа , у которых первая цифра в два раза больше второй ,
Показать ответ
Ответ:
egorsnaiper201
10.07.2020 11:17
Program pr1;
var i:integer;
begin
for i:=10 to 99 do
if (i div 10)/(i mod 10) = 2
then
writeln (i);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
aimsen
17.06.2020 00:24
Сканируется цветное изображение размером 2•3 дюйма. разрешающая сканера - 600•600 dpi, глубина цвета - 8 битов. какой информационный объём будет иметь полученный графический файл...
ksenia87109r675
23.12.2021 21:36
Массив вводится в области описания const, вывести массив в строку его минимальный элемент и номер минимального элемента....
golovkosofia868
12.10.2020 21:14
Задано текст з малих латинських літер. Скласти програму, яка формує список (список містить в алфавітному порядку по одній літері латинські голосні літери з множини {а, е, i, о,...
Sili12
09.07.2021 07:26
8. Что определяет количество индексов массива? 9. Запишите имя массива, если он имеет элементы mas[1], mas[2], ... 10. Задавая разные значення элементам массива, можно ли изменить...
верника3
07.03.2023 19:08
Если не знаете не отвечайте. Задание на фото. На 1 и 2 вопрос не надо отвечать....
xomahgf
19.04.2022 21:19
2. Что будет с данными в выделенной ячейке, если нажать на выбранную опцию? (5б)A. Текст станет большимB. Текст станет полужирнымC. Текст станет зачеркнутыD. Текст станет подчеркнутым3....
Vartur203
18.12.2021 02:57
Создать блок-схему; Z=Пr2, 2 в показатели степени...
толик147
07.07.2022 16:05
Для логического выражения нарисуйте соответствующую ему электронную схему и вычислите значение этого выражения при В=1, B= АC=1 ¬(A ∨ B) & ¬C (8 КЛАСС)...
Hennesy322
09.09.2021 18:17
Уровень — Синтез Необходимо покрасить стены кухни. Сколько потребуетсябанок краски, если известно, что:- размеры кухни 405 x 310 x 285 см.88% площади стен занимает кафельная плитка;1...
ibufiz18
25.10.2022 22:31
Радиус основания цилиндра 6 см, а его образующая 10 см. найти площадь осевого сечения цилиндра....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i:integer;
begin
for i:=10 to 99 do
if (i div 10)/(i mod 10) = 2
then
writeln (i);
end.