Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Vovanik212
17.08.2021 03:07 •
Информатика
Составить программу на паскале. агент 007 узнал, что в секретном сейфе трёхзначный код, в котором все три цифры разные.при этом средняя цифра равна разности крайних цифр. составить программу, которая напечатает для него все такие числа.
Ответ:
adubnovitskaj
21.06.2020 21:28
Var a,b,c,d:integer;
begin
d:=a+b*10+c*100;
for d:=100 to 999 do
begin
if b=a-c or b=c-a then writeln (d);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
maks312017
26.12.2020 23:19
Сделать в паскале и кинуть готовый код (не файл! ) у николая есть а лимонов, b яблок и c груш. он решил приготовить из них компот. по рецепту фрукты должны быть в соотношении a: b:...
198565
26.12.2020 23:19
Найти разность двух чисел, записанных в двоичной системе 10100-00011=х найти х, записать его в десятичном виде....
mainura2006
10.09.2020 07:10
Какой объем видеопамяти необходим для хранения 2 страниц изображения при условии, что разрешающая монитора равна 640×480 точек, глубина цвета = 24....
moto5
10.09.2020 07:10
Построение алгоритма и его реализация в среде visual basic для следующей : ученик выполнил работу. в зависимости от количества ошибок в работе ученика необходимо выставить соответствующую...
lissden7
26.08.2021 11:09
Найти сумму элементов,стоящих на четных местах в массеве из 10 элементов,заданных с клавиатуры...
vgfhdijubvn
16.01.2023 22:27
Выполнить синтаксический разбор первого предложения. объяснить свой выбор предложение: владимир клавдиевич арсеньев- знаменитый исследователь дальнего востока, талантливый писатель....
supersattarova
16.01.2023 22:27
Щасливе закiнчення до оповiдання лось...
Katya1143
16.01.2023 22:27
Примеры 2 положительного и два отрицательного ,что природа делает для человека )...
yakovlevayaninaA
16.01.2023 22:27
Общая протяжённость границы российской федерации - 60933 км из них 38808 км в морские границы пользуясь данными предыдущей и сравни протяженность сухопутных и морских границ казахстана...
doktornastia03
16.01.2023 22:27
Сделать вывод таблицы ! (рыночная ,командная ,традиционная )...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
d:=a+b*10+c*100;
for d:=100 to 999 do
begin
if b=a-c or b=c-a then writeln (d);
end;
end.