Даны две переменные. составить алгоритм, который уменьшит обе переменные на 5, если хотя бы одна из них больше 15, иначе выдаёт соответствующее сообщение

Vara,b:real;BeginWrite('a = ');ReadLn(a);Write('b = ');ReadLn(b);if (a>15)or(b>15) then   Begin   a:=a-5;   b:=b-5;   WriteLn(a,' ',b);   Endelse Write('Соответствующее сообщение');End.

язык с++, написан на dev-c++ 4.9.9.2