Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Vironika123321
10.11.2020 14:43 •
Информатика
Среди двузначных чисел найти те, сумма цифр которых равна 10 (pascal).
Показать ответ
Ответ:
znj93294znj93294
06.10.2020 08:01
Program;
var a,i:integer;
Begin
for i:=10 to 99 do
read(a);
if (a mod 10+ a div 10=10) then
write(a);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
movnar98
10.07.2021 03:24
Укажите последовательность команд для запуска графического редактора Paint: * О Pi*y – Microsoft Office Меню – Программы изображения – Paint О О Paint - Gamma Графика...
Tatjanaaa
13.06.2021 12:27
Племя пульти пользуется 32 символьным алфавитом свод основных законов племени хранится на 512 глинянных табличках, на каждую из которых нанесено ровно 256 символов. какое...
Ljjr6958der8cox45
28.02.2020 05:38
Замените ложные высказывания на истенные: при выключении компьютер информация из оперативной памяти стирается. на сd-rзаписывать информацию невозможно. объем диска cd-rom...
alexgreen5454
18.01.2022 15:01
Створення копії документа на папері...
kislayaya13
07.10.2022 22:49
Работа с базами данных Разработать в среде MS Access структуру базы данных. Варианты тем взять из предложенного ниже перечня в соответствии с номером в списке группы...
lizstys
18.09.2022 17:25
В парке транспортной компании 15 автобусов, при этом у каждого автобуса свой собственный маршрут соединяющий два города. Сколько городов обслуживает транспортная компания,...
Semen123486
25.11.2021 08:55
Какое число появится в ячейке сз, если формулу из ячейки A1 скопировать в ячейку В1?...
olyakirnay
14.07.2020 15:46
В ЭТ получена таблица умножения на 5 следующего вида Таблица была построена путем заполнения лишь первых двух строк и выполнения команды КОПИРОВАТЬ А2:Е2 в АЗ:Е5. Представьте...
EveYo
04.07.2020 19:14
Мне нужна с этим Задание в с ++ 7. Даны два натуральных числа. Определить , является хотя бы одно из них палиндромом ( число, которое читается одинаково слева направо...
Scucorif
27.11.2022 21:38
Выполняем в тетради Заполни таблицу. В каких режимах работает гироскопи-ческий датчик?Гироскопический датчик...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,i:integer;
Begin
for i:=10 to 99 do
read(a);
if (a mod 10+ a div 10=10) then
write(a);
End.