Дано два числа визначте чи рівні вони який більше?
Дано два числа визначте чи рівні вони який більше?
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы