Федя пытается протолкнуть в форточку размерами x см и y см свою голову, длина окружности которой с см. удастся ли мальчику его эксперимент или голова застрянет?
var x,y,c,r:real; begin writeln('x, y, c:'); readln(x,y,c); r:=c/(2*pi); if (r<x)and(r<y) then writeln('Эксперимент удастся') else writeln('Не стоит и пытаться'); end.
begin
writeln('x, y, c:');
readln(x,y,c);
r:=c/(2*pi);
if (r<x)and(r<y)
then writeln('Эксперимент удастся')
else writeln('Не стоит и пытаться');
end.
Пример:
x, y, c:
30 40 55
Эксперимент удастся