Напишите программу кторая запрашивает два числа а и б сравнивает их и выводит знак сравнения < если а если а> б если а=б

Program zadacha;vara,b:real;beginwriteln('vvedite dva chisla');read(a,b);if a>b then writeln(a,'>',b);if a<b then writeln(a,'<',b);if a=b then writeln(a,'=',b);end.