Помогите составить алгоритм ветвление.
Сравнить два числа, введенных пользователем. Необходимо указать, какое число больше, или, если числа равны, вывести об этом сообщение.
Это в паскале
var
a,b:real;
begin
write(Введите первое число - );
readln(a);
write(Введите второе число - );
readln(b);
if a=b then writeln(a,=,b)
else
if a>b then writeln(a,>,b)
else writeln(b,>,a);
end.
Оцени ответ
