abc

[geship]

5. Даны два числа А и В. Переменной А присвоить большее, а в переменной В – меньшее из двух значений, находившихся там ранее.
пожалуйста пишите полное решение

[Mad_Cat]

var a,b:real;
begin
readln(a,b);
if b>a
then begin
b:=a+b;
a:=b-a;
b:=b-a;
end;
writeln('a=',a,' b=',b);
end.

[geship]

спасибо!))

[Mad_Cat]

спасибо!))

Задачки из Абрамяна?

[geship]

не знаю нам информатичка дала под конец семестра)