С клавиатуры вводятся два вещественных числа. Выведите через запятую в одной строке сначала меньшее из них, а потом большее.
Program prog;
uses crt;
var a,b: real;
begin
clrscr;
write(a = );
readln(a);
write(b = );
readln(b);
if aif a>b then writeln(b,, , a);
if a=b then writeln(a,, , b, - числа равны);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
