Pascal

Федя пытается протолкнуть в форточку размерами X см и Y см свою голову, длина окружности которой С см. Удастся ли мальчику его эксперимент или голова застрянет?

Question

Информатика

Валяка

24 апреля, 12:09

Pascal

Федя пытается протолкнуть в форточку размерами X см и Y см свою голову, длина окружности которой С см. Удастся ли мальчику его эксперимент или голова застрянет?

+5

Ответы (1)

Знаете ответ?

Виктория · Answer 1

Var

X, Y, C:real;

Begin

Write ('X = ') ;

ReadLn (X) ;

Write ('Y = ') ;

ReadLn (Y) ;

Write ('C = ') ;

ReadLn (C) ;

C:=C/Pi;

if (X>=C) and (Y>=C) then Write ('Удастся')

else Write ('Не удастся')

End.

PascalФедя пытается протолкнуть в форточку размерами X см и Y см свою голову, длина окружности которой С см. Удастся ли мальчику его эксперимент или голова застрянет?

Pascal

Федя пытается протолкнуть в форточку размерами X см и Y см свою голову, длина окружности которой С см. Удастся ли мальчику его эксперимент или голова застрянет?