Дано два числа визначте чи рівні вони який більше?

Question

Дано два числа визначте чи рівні вони який більше?

Comments

Можно перевести?))

---

ДаноДва числа вызначте читать ровние они какой из них больше

Answer 1

Var
a,b:real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
if a=b then WriteLn(a,' = ',b)
else if a>b then WriteLn(a,' > ',b)
     else WriteLn(a,' < ',b);
End.