tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составить программу на паскале.
Составить программу на паскале. агент 007 узнал, что в секретном сейфе трёхзначный код, в котором все три цифры разные.при этом средняя цифра равна разности крайних цифр. составить программу, которая напечатает для него все такие числа.
elenafrolova31
3 25.05.2019 16:40
2
Ответы
Илона2407
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
emilinloveTV
25.11.2020 16:56
На рабочем диске Z: создать папку с номером группы (если её там нет) и в ней создать папку с фамилией. (Вся дальнейшая работа выполняется только в этой папке). Что за рабочий диск...
daniil539
25.11.2020 16:56
В какой из перечисленных пар данные относятся к одному типу? 1) Да и FALSE 2) 08.01.2016 и 2016 3) Иванов и 2017 4) 25 20 и 23...
ekhvalebo
21.04.2020 19:16
Какую алгоритмическую конструкцию содержат все циклические алгоритмы? Выберите один из 4 вариантов ответа: 1) Ветвление 2) Следование 3) Рекурсию 4) Цикл след задание-...
rayl2
21.04.2020 19:30
SketchUp програмассымен жұмыс істеуде қандай ережелерді сақтау қажет?...
DashaHB16
21.04.2020 19:30
Дан одномерный целочисленный массив, размерности n. Получить вывод только чётных элементов массива. Массив можно задать случайным образом, вводом с клавиатуры или используя файл....
turuo
25.12.2019 20:31
Выбери верный ответ. яркостьredgreenblueцвет1001розовый ярко-малиновыйоранжевый голубой...
VovkaGamer228
25.12.2019 20:31
Написать программу по . даны 3 целых числа, найти количество положительных цифр на паскале...
Karinaa11111
25.12.2019 20:29
Таблица истинности для всех кроме (и)...
KeKsickON
25.12.2019 20:28
Максимальная длина монотонного фрагмента последовательности. дана последовательность натуральных чисел, завершающаяся числом 0. определите наибольшую длину монотонного фрагмента...
вика36100
25.12.2019 20:27
Укажите все варианты решения...
Популярные вопросы
Слово гнезде разобрать по составу слово; ветке произвести фонетический разбор;...
1
Вычислить площадь фигуры ограниченной параболой у=х2+3х-2 у=х-2...
3
Решите неравенство 4(3x-4)-3(4x-3) =1-5x...
1
Докажите тождества а) sin44°+sin26°/cos44°+cos26°=ctg55° б) cos5α+cos9α/sin5α+sin9α=tg(π/2-7α)...
3
Скакими трудностями сталкиваются в жизни подростки с низкой самооценкой? как...
2
Что (по мнению антропологов) в древнего человека около 60 000 лет назад определило...
3
Опишите различия между геоцентрической и гелиоцентрической системами мира...
3
Каких животный называют растительноядными...
3
Два автомобиля едут по кольцевой дороге в одном направлении с постоянными скоростями....
3
Как называются в праве группы подростков от 12 до 14, от 14 до 16, от 16 до...
1
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.