40, так как m*n = 20*40, то m= 20, n =40.
"Навигатор"
Рабочая область
"Файл"
"Рассылка"
"Главная"
Var
a,b,c,s,k,x,q,f:real;
begin
write('Vvedite a,b,c: ');
readln(a,b,c);
s:=-b+c-5;
k:=-3*a;
q:=-a*3;
f:=-b+c-5;
begin
If (q<0) and (f<0) then
writeln('x','<',s/k)
else
writeln('x',' >',s/k);
end;
end.
Посмотри на картинку может поможет