урок 7 задача 2

урок 7 задача 2

Получите от пользователя значения переменной, сравните его со значением символа пятёрки 5 и выведите результат сравнения на экран

.

program B5;

var
 a :char;
  b :integer
begin
  a=: '5';
  readln(b);

 write(' a=b ');
 readln();

end.