Это нужно сделать в ПИТОНЕ, НЕ В ПАСКАЛЕ! 1.Дано целое число N (> 0). Найти наименьшее целое положительное число K, квадрат которого превосходит N: K2 > N. Функцию извлечения квадратного корня не использовать.
2.Дано целое число N (> 0). Найти наибольшее целое число K, квадрат которого не превосходит N: K2 ≤ N. Функцию извлечения квадратного корня не использовать.
265
371
Ответы на вопрос:
Program zn2; uses crt; var s1, s2, s3: real; r1, r2: integer; begin clrscr; repeat write ('enter r1, r2: '); readln (r1, r2); until (r1> =1) and (r2< =100); s1: =pi*sqr(r1); s2: =pi*sqr(r2); s3: =s1-s2; writeln ('s1=', s1: 0: 3); writeln ('s2=', s2: 0: 3); writeln ('s3=', s3: 0: 3); readkey; end.
Популярно: Информатика
-
ДианаBerts22.10.2020 16:56
-
Sobakopes10.09.2022 02:39
-
сэрго200201.12.2022 16:28
-
Кари1514228.10.2021 09:47
-
ФлэшДевушка15.10.2020 20:35
-
Лелечка4310.09.2021 21:36
-
cross66617.02.2022 18:28
-
atomis29.08.2020 18:35
-
AnnaSind15.01.2022 15:18
-
gaasvaleria07.09.2022 07:30