Nikolaevich1534

13.10.2021

1. Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования. Алгоритмический языкалгнач  цел n, s  n := 0  s := 0  нц пока 3*s < 111    s := s + 8    n := n + 2  кц  вывод nкон 2. Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования.Алгоритмический языкалгнач    цел s, n    s := 80    n := 0    нц пока s + n < 150        s := s − 5        n := n + 15    кц    вывод nкон

Информатика

Ответить

Ответы

eoils-info

13.10.2021

Чтобы квадрат вписался в круг, его диагональ должна быть равна диаметру круга. Если трактовать "уместиться" как "пролезть", то диагональ должна быть меньше диаметра..
Формулы площадей квадрата S₁ и круга S₂ известны, что легко позволяет нам найти нужное условие.
$\displaystyle S_1=a^2 \to a=\sqrt{S_1}; \ d=a \sqrt{2}= \sqrt{2S_1} \\ S_2=\frac{\pi D^2}{4} \to D=\sqrt{\frac{4S_2}{\pi}}; \\ d\ \textless \ D \to \sqrt{2S_1}\ \textless \ \sqrt{\frac{4S_2}{\pi}}; \ 2S_1\ \textless \ \frac{4S_2}{\pi} \ \to \ \boxed{\pi s_1\ \textless \ 2S_2}$
Если нужно, чтобы случай, когда квадрат вписан в круг тоже учитывался, строгое неравенство следует заменить нестрогим.

// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
var s1:=ReadReal('Площадь квадрата');
var s2:=ReadReal('Площадь круга');
if pi*s1<2*s2 then Writeln('Квадрат умещается в круге')
else Writeln('Квадрат не умещается в круге')
end.

Тестовое решение:
Площадь квадрата 24.6
Площадь круга 28.4
Квадрат не умещается в круге

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1. Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования. Алгоритмический языкалгнач цел n, s n := 0 s := 0 нц пока 3*s < 111 s := s + 8 n := n + 2 кц вывод nкон 2. Запишите число, которое будет напечатано в результате выполнения следующей программы. Для Вашего удобства программа представлена на пяти языках программирования.Алгоритмический языкалгнач цел s, n s := 80 n := 0 нц пока s + n < 150 s := s − 5 n := n + 15 кц вывод nкон

▲

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

дайте определение компьютеру

Определите значение переменной c после выполнения следующего фрагмента программы a: =-5 b: =14 b: =b+a2 if a> b then c: =a+b else c: =b-a a: =-5 b: =-3 b: =a-b2 if a> b then c: =b-a else c: =a...

Вкакой системе счисления число 64 записывается как 44x? определите основание системы счисления x

ЗАДАЧА НА МАССИВЫ определить количество чисел кратных трём и оканчивающихся на 2 и заменить на 0

Сколько проходов с перестановками элементов потребуется при сортировки массива из 100 чисел (в пузырьке)?

Какой символ нельзя использовать при создании имени файла?

Перевести из 10сс в 2сс 62, 128, 1173

СОСТАВИТЬ ТАБЛИЦУ ЗНАЧЕНИЙ ФУНКЦИИ

Какое количество байт будет передаваться за 5 секунд по каналу передачи информации с пропускной Мбит/с?

Дан вещественный вектор А(n Найти количество элементов этой таблицы, больше средне-го арифметического всех ее элементов. Сортировка методом стандартного обмена.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

дайте определение компьютеру

Определите значение переменной c после выполнения следующего фрагмента программы a: =-5 b: =14 b: =b+a*2 if a&gt; b then c: =a+b else c: =b-a a: =-5 b: =-3 b: =a-b*2 if a&gt; b then c: =b-a else c: =a...

Вкакой системе счисления число 64 записывается как 44x? определите основание системы счисления x

ЗАДАЧА НА МАССИВЫ определить количество чисел кратных трём и оканчивающихся на 2 и заменить на 0​

Сколько проходов с перестановками элементов потребуется при сортировки массива из 100 чисел (в пузырьке)?​

Какой символ нельзя использовать при создании имени файла?

Перевести из 10сс в 2сс 62, 128, 1173

СОСТАВИТЬ ТАБЛИЦУ ЗНАЧЕНИЙ ФУНКЦИИ

Какое количество байт будет передаваться за 5 секунд по каналу передачи информации с пропускной Мбит/с?

Дан вещественный вектор А(n Найти количество элементов этой таблицы, больше средне-го арифметического всех ее элементов. Сортировка методом стандартного обмена.

Определите значение переменной c после выполнения следующего фрагмента программы a: =-5 b: =14 b: =b+a2 if a> b then c: =a+b else c: =b-a a: =-5 b: =-3 b: =a-b2 if a> b then c: =b-a else c: =a...

ЗАДАЧА НА МАССИВЫ определить количество чисел кратных трём и оканчивающихся на 2 и заменить на 0

Сколько проходов с перестановками элементов потребуется при сортировки массива из 100 чисел (в пузырьке)?