Запиши верный ответ, если дан алгоритм: a1:=9/(17x)
a2:=a1/x
a3:=a2/x
a4:=a3/x
y:=a1+a4
Какое значение получит переменная y после выполнения алгоритма?
x:=4
y:=4∗x
y:=y+3
y:=y∗x
y:=y+4
y:=y∗x
y:=y+5
Из ряда чисел 6, 12, 21, 28 выпиши те, которые удовлетворяют условию.

Выполни действие и запиши верный ответ.
18mod5=

Запиши верный ответ.
27div8

Дан алгоритм для Робота:

алг
нач
нц 10 раз
вправо; закрасить
кц
кон

Если правее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на n клеток вправо и закрасит эти клетки.
Если правее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 10 клеток вправо.
Если левее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 10 клеток влево и закрасит эти клетки.
Если правее Робота не встретится препятствий, то, выполнив приведённый выше алгоритм, он переместится на 10 клеток вправо и закрасит эти клетки.

Запиши верный ответ, если дан алгоритм: a1:=9/(17x) a2:=a1/x a3:=a2/x a4:=a3/x y:=a1+a4 Какое значе

Показать ответ

Ответ:

glupostsroghdeniy

31.01.2020 17:29

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
var s:=a.IndexesOf(x->x mod 10=0);
if s.Count=0 then Writeln('Нет элементов, оканчивающихся на 0')
else begin
    Write('Номера элементов, оканчивающихся на 0: ');
    s.Select(i->i+1).Println
    end
end.

Примеры
n= 12
-41 46 29 -13 -43 -21 48 43 41 -48 -19 -44
Нет элементов, оканчивающихся на 0

n= 16
37 -48 39 32 -6 21 -48 34 6 12 -10 -15 40 -36 46 26
Номера элементов, оканчивающихся на 0: 11 13

0,0(0 оценок)

Ответ:

tinapai

27.03.2020 02:51

Чтобы квадрат вписался в круг, его диагональ должна быть равна диаметру круга. Если трактовать "уместиться" как "пролезть", то диагональ должна быть меньше диаметра..
Формулы площадей квадрата 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
Квадрат не умещается в круге

0,0(0 оценок)

Популярные вопросы: Информатика