Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
пир14
01.11.2020 20:23 •
Информатика
Решить на языке pascal : среди всех двузначных чисел найти двузначное число, равное утроенному произведению его цифр.
Ответ:
Danilenok
26.05.2020 06:12
var i:integer;
begin
for i:=10 to 99 do
if i=3*(i div 10)*(i mod 10) then writeln(i);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Marsel2V
24.09.2021 15:27
Вводится последовательность неотрицательных целых чисел в количестве 5 штук,нужно найти кол-во четных и не четных цифр в ней,а также вывести максимальное не четное и минимальное...
ДашаСалина
05.02.2020 12:30
Адам мен компьютер арасындағы қатынас қандай? ...
juliamarvel1
09.03.2021 18:39
Применяя методы шифрования, закодируйте словосочетание How are you. Код морзе: Десятичный код:Двоичный код: И БЫСТР...
kati1200777
06.08.2022 21:33
Жауабын кім білед көмек тесіңдерші таппай жатрм...
ник3742
10.10.2020 08:33
Очень завтра уже будет поздно!...
6luille9
19.12.2020 22:55
Выбери правильные имена. 1)a_kloun 2)Щ...
сонечка3332002
24.04.2023 22:19
Информационное сообщение объёмом 450 бит состоит из 150 символов .каков информационный вес каждого символа сообщение...
sashamenkov18
05.01.2023 20:15
Текст составлен с использованием алфавита мощностью 64 символа и содержит 100 символов. каков информационный объем текста? ответить !...
Lovetoo
17.12.2022 22:59
Составить програму поиска большого элемента в масиве из 10 чисел...
CheIIOVek
17.12.2022 22:59
Определите информационный размер текстового документа, если он записан с 512- символьного алфавита, содержит 80 символов в строке , 21 строк и 3 страницы....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i:integer;
begin
for i:=10 to 99 do
if i=3*(i div 10)*(i mod 10) then writeln(i);
end.