СРОЧНО!напишите программу : Два целых числа А и В вводятся с клавиатуры (А>В). Напишите программу, которая будет отнимать от переменнной А число 5 до тех пор пока А не станет меньше В.

Вопрос школьника по предмету Информатика

СРОЧНО!напишите программу :
Два целых числа А и В вводятся с клавиатуры (А>В). Напишите программу, которая будет отнимать от переменнной А число 5 до тех пор пока А не станет меньше В.

Ответ учителя по предмету Информатика

program n_3;

var A, B: real;

begin

read (A,B);

If A>B then begin A-5, while A>B

end.

end.