Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
missis23ashikhmina
05.05.2022 02:31 •
Информатика
Дано трёхзначное число, поменять местами сотни и единицы и сравнить эти числа? ?
Показать ответ
Ответ:
imancom2005
21.06.2020 17:22
Var a, b, c: integer;
begin
readln(a);
b := (a mod 10 * 100) + (a mod 100 div 10 * 10) + (a div 100);
if (a > b) then
writeln(a, ' > ', b)
else if (a = b) then writeln(a, ' = ', b)
else writeln(a, ' < ', b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Пулmn
07.03.2023 06:05
Pascal. дан одномерный динамический массив a(n), заполненный случайными числами в диапазоне от -30 до 30. все отрицательные элементы до минимального обнулить. исходный и изменённый...
zeca123415
07.03.2023 06:05
Составьте программу нахождения наименьшего натурального n-значного числа x (х =10), равному утроенному произведению своих цифр. pascal...
Mawamawa00
20.01.2020 22:06
1.база данных служит для: a. хранения и информации b. ведения расчетно-вычислительных операций c. обработки текстовой документации d. обработки графической информации 2. какой вид...
Viksa1451
04.06.2023 03:03
3или 2 примера перевода дробных чисел из 10сс в 2сс...
ПОМОГИТЕ1111121
04.06.2023 03:03
Решите в паскале. если можно с блок - схемой. дана последовательность чисел. вывести на экран все отрицательные числа....
Анжела921
23.01.2020 00:45
Текст составлен с использованием алфавита мощностью 64 символа и содержит 100 символов. каков информационный объем текста? ответить !...
ozorkaltseva
23.01.2020 00:45
1) определить количество информации фразы: мама мыла раму! . если известно, что мощность алфавита с дополнительным символами = 54 2) 2гб перевести в биты( написать цепочку вычислений)...
мафінка
02.05.2022 04:34
Напишите алгоритм для расположения двумерного массива спиралью. input.txt(ввод) 3 output.txt(вывод) 1 2 3 8 9 4 7 6 5 язык паскаль...
cfdetgh
10.07.2022 03:59
Поезд идёт со скоростью 72 км/ч сколько метров в секунду проходит поезд...
koiiik1p0725i
10.07.2022 03:59
Вкаком году царская власть назначила второго хана в среднем жузе:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
b := (a mod 10 * 100) + (a mod 100 div 10 * 10) + (a div 100);
if (a > b) then
writeln(a, ' > ', b)
else if (a = b) then writeln(a, ' = ', b)
else writeln(a, ' < ', b);
end.