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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
