Question

Составьте программу с блок схемой: 4. Заданы площади круга и квадрата. Поместится ли круг в квадрате?

Answer 1

var
Sk,Skv:integer;
begin
read(Sk,Skv);

if Sk <= pi*Skv/4 then
 writeln('Входит')
else
 writeln('Не входит');

read;

end.

 

P.S. Если понравилось решение не забудь отметить как лучшше. ;)