Вводятся значения двух ЦИФР. Напечатать максимальное двузначное число, которое можно сформировать из этих цифр или сообщение, что таких двузначных чисел не существует. (Pascal)
Вводятся значения двух ЦИФР. Напечатать максимальное двузначное число, которое можно сформировать из этих цифр или сообщение, что таких двузначных чисел не существует. (Pascal)
Гость
Ответ(ы) на вопрос:
ГостьProgram op;
uses crt;
var a, b, max, min:integer;
Begin
clrscr;
writeln('Введите первое число ');
readln(a);
writeln('Введите второе число ');
readln(b);
If a>b then max:=a min:=b else max:=b min:=a;
writeln(max min);
end.
Не нашли ответ?
Похожие вопросы