Известны длина стороны квадрата и радиус окружности.определить поместиться ли квадрат в окружность. как составить программу в паскаль?
105
479
Ответы на вопрос:
Var a,r: real; begin write ('storona kvadrata: '); readln (a); write ('radius: '); readln (r); if (a*sqrt(2))< =2*r then writeln ('yes') else writeln ('no'); readln; end.
Популярно: Информатика
-
wasgf18.07.2022 06:13
-
isakdzhanova09.12.2022 01:36
-
Петр123456122.11.2021 13:10
-
AlexDid00029.04.2022 19:52
-
stas95201121721720.07.2020 16:49
-
silverfinn07.01.2022 22:39
-
typoiya27.09.2021 09:57
-
88005555355505.02.2020 12:26
-
ПОРНОООСЕКС15.10.2022 14:55
-
FCMM12.09.2021 13:13