Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Дано трёхзначное число, поменять местами сотни и единицы и сравнить эти числа??

5-9 класс

Tattta 29 мая 2013 г., 9:53:09 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
P11ti
29 мая 2013 г., 11:36:01 (10 лет назад)

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.

Ответить

Другие вопросы из категории

Читайте также

помогите решить задачи по информатике (на уровне знаний 7 класса) с помощю PascalABC

1. Дано 2 числа найти модуль разности этих чисел увеличенный в 5 раз.
2. Дано 4 значное число поменять местами 1 и 2 цифру местами
3. Дан диаметр круга найти его площадь (формула S=п*R).
Я примерно знаю как писать но всеровно нуждаюсь в помощи
Мои мысли:
program z1;
uses crt;
var ... : integer;
begin
дальше всё в тумане
буду рад за решённые 1 или 2 задачи

1)сколько нулей в двоичной записи восьмеричного числа 34526107? 2)сравните два числа 100111 двоичный и 51 восмеричный 3)перевести в восьмеричную систему

счисления 110001000,1001 ДВОИЧНЫЙ 4)сколько единиц в двоичной записи шестнадцатеричного числа F523С? 5)сравните два числа 101111двоичный 47 восмиричный помогиииииииитеееее



Вы находитесь на странице вопроса "Дано трёхзначное число, поменять местами сотни и единицы и сравнить эти числа??", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.