Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
БеняФазбер
30.04.2020 13:20 •
Информатика
Программирование, 10 класс pascal abc необходимо написать код к (как можно проще): указать в диапазоне от a до b числа, сумма цифр которого совпадает с их произведением. или сообщить об отсутствии таких чисел.
Показать ответ
Ответ:
superg64745
07.07.2020 13:09
Const a=1; b=5;
Var i:integer;
Begin
for i:=a to b do
if i*i = i+i then
writeln(i);
readln;
end. Достаточно простой код
0,0
(0 оценок)
Популярные вопросы: Информатика
nnika1015
01.08.2020 17:36
Описать функцию square(k) логического типа, возвращающую true, если целый параметр k( 0) является квадратом некоторого числа, и false в противном случае. паскаль...
Училка2281337
01.08.2020 17:36
Составить алгоритм решения согласно своему варианту и написать программу на языке с++. в отчете предоставить блок-схемы функции : вводится последовательность целых чисел, 0...
TheAlexFunny
01.08.2020 17:36
1.алфавит племени пульти содержит 64 символа. каков информационный вес символа этого алфавита? 2. инф. сообщение объёмом 560 битов состоит из 80 символов. какова мощность алфавита...
Gogi354
22.02.2022 06:06
ЕГЭ по информатике 6 задание...
alegarxih
15.01.2023 14:05
Какие передачи информации бывают ?...
Кись123
15.01.2023 14:05
Нужно написать программу, которая будет переводить из любой системы счисления в десятеричную. и должны присутствовать mod и div, желательно покороче!...
vikapataeva
22.09.2022 11:49
Написать программу для блок-схемы с использованием оператора...
geragyy
22.08.2022 23:06
За рахунок чого США стали однією з найрозвинутіших економік світу в кінці XIX на початку XX ст...
zhiestZAlm
03.02.2021 11:18
: 1. Before I went to Russia last year I (to read) a lot about it. 2. I found that your country (to change) so much. 3. I (to hear) that Moscow became as an international city...
alishraup
05.05.2022 18:47
Людвиг ван Бетховен Написал сочинения: (Прохорова. Музыкальная литература зарубежных стран. 5 класс)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var i:integer;
Begin
for i:=a to b do
if i*i = i+i then
writeln(i);
readln;
end. Достаточно простой код