Var a: array [1..20] of integer; i, s: integer;
begin
randomize;
s := 0;
for i := 1 to 20 do
a[i] := random(40) - 10;
for i := 1 to 20 do
begin
write(a[i], ' ');
if (a[i] + 10) mod 2 = 1
then
s := s + 1;
end;
writeln();
writeln(s);
<span>end.</span>
Ответ:
b = 3
Объяснение:
Нужно подобрать такое число b, чтобы уравнение
13b² +1 = 118 было верно,
Приведём к красивому виду:
13b² = 117 Поделим обе части на 13
b² = 9 и решим
2 корня
b₁= 3 и b₂ = -3
Подходит лишь первый по условию
Схема и таблица - в прилагаемом файле.
1) Ответ 2, <span>i=j
2) Ответ 3. в 6 раз</span>
<span>Слова среднего рода, не склоняютьс, имеют единственное счисление.</span>