Agarana
6 год назад
ПРОГРАМИРОВАННИЕ В ПАСКАЛЕ.Вводится двухзначное число.Упорядочить цифры в нём по возрастанию. Вывести результат на экран. Пример Ввод:64Вывод:46Ввод:23Вывод:23 P.s.: Вводится одно число – N (от 10 до 99).Выводится результат – новое число. Дополнительных переменных нет!
ОТВЕТЫ
Цеца
Oct 24, 2020
var
a,b,c:integer;
begin
writeln('Vvedite chislo ot 10 do 99');
readln(c);
a:=c div 10;
b:=c mod 10;
if b>a then writeln(c) else
begin
c:=b*10+a;
writeln(c);
end;
end.
a,b,c:integer;
begin
writeln('Vvedite chislo ot 10 do 99');
readln(c);
a:=c div 10;
b:=c mod 10;
if b>a then writeln(c) else
begin
c:=b*10+a;
writeln(c);
end;
end.
755
Смежные вопросы:
