Помогите в Turbo Pascal!

Вот мне надо это место которое я выделил сделать Красным цветом


Program m1;
Var a,b:integer;y:real;
Begin
Writeln('**************************************');
Writeln('* Программа КАЛЬКУЛЯТОР *');
Writeln('* УМНОЖЕНИЕ ЧИСЕЛ *');
Writeln('* Автор программы: *');
Writeln('* ˜------------------------------------------*');
Writeln('**************************************');
Writeln('');
writeln('Введите число "A"');
readln(a);
writeln('Введите число "B"');
readln(b);
y:=a*b;
Writeln('Ответ: ',y:5:1);
readln;
readln;
end.