Составить программу решения неравенства ах>в в Паскале

Program BiFi;
Var a,x,b:real;
Begin
readln(x);
readln(a);
readln(b);
if a*x>b then writeln(true);
            else writeln(false);
readln;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.