входные числа не превышают 10 и 9-ой степени. 1.Дано целое положительное двузначное число. Вывести число, полученное при перестановке цифр исходного числа.
2.Дано целое положительное трехзначное число. Вывести вначале его последнюю цифру(единицы), а затем-его среднюю цифру(десятки).
3.Даны два числа. Вывести вначале большое, а затем меньшее из них.
2.Дано целое положительное трехзначное число. Вывести вначале его последнюю цифру(единицы), а затем-его среднюю цифру(десятки).
3.Даны два числа. Вывести вначале большое, а затем меньшее из них.
More Questions From This User See All
Answers & Comments
program kw1;
uses
crt;
var
a, b: longint;
begin
writeln('1.');
writeln('Введите положительное двузначное число:');
readln(a);
writeln((a mod 10) * 10 + (a div 10));
writeln;
writeln('2.');
writeln('Введите целое положительное трехзначное число:');
readln(a);
writeln(a mod 10);
writeln((a mod 100) div 10);
writeln;
writeln('2.');
writeln('Введите два числа через пробел:');
readln(a, b);
if a > b then
writeln(a, ' ', b)
else
writeln(b, ' ', a);
end.