Составить программу паскаль. вывести на экран название операции сравнения, соответствующей введенному с клавиатуры символу: >,<,=. Ответ записать в виде: "Была введена операция сравнения-равно".

Var a:char;

begin

write ('Введите символы операции сравнения: ') ;

readln (a) ;

case a of

'>' : writeln ('Была введена операция сравнения - больше') ;

'<' : writeln ('Была введена операция сравнения - меньше') ;

'=' : writeln ('Была введена операция сравнения - равно') ;

else

writeln ('Вы ввели непонятные системе символы') ;

end;

end.