Одну единственную
for (интератор начала, условие выхода, шаг) { }
Ответ:
program kod;
var
a: array [1..10] of Integer;
i, p: Integer;
begin
for i:=Low(a) to High(a) do a[i]:=-40+Random(91);
p:=1;
for i:=Low(a) to High(a) do if (a[i]>0) and (a[i] mod 7=0) then p:=p*a[i];
end.
Объяснение:
У меня второй вариант решения. Размерность массива: [1..10] можно любую делать
<span>from random import randint
mas = [randint(0,100) for i in range(40)]
print('40 рандомних чисел\n',mas)
seredne = sum(mas) / len(mas)
print("Cередне:\n ",seredne)
sere = []
for x in mas<span>:
</span>----if x >seredne<span>:
</span></span>--------<span>sere.append(x)
print('Числа більші середнього:\n',sere)
vidsotok = (len(sere) /len(mas)) * <span>100
</span>print("Відсоток чисел більших середнього значення :",round(vidsotok,3),'%')
Приклад:
40 рандомних чисел [42, 77, 69, 89, 50, 56, 40, 97, 79, 78, 60, 62, 50, 70, 21, 89, 74, 38, 58, 37, 2, 52, 2, 49, 50, 83, 85, 72, 96, 28, 25, 9, 73, 60, 65, 30, 66, 35, 73, 83]
Cередне: 56.85
Числа більші середнього:
[77, 69, 89, 97, 79, 78, 60, 62, 70, 89, 74, 58, 83, 85, 72, 96, 73, 60, 65, 66, 73, 83]
Відсоток чисел більших середнього значення : 55.0 %
</span>
213
× 3
-------
1023
Рассмотрим младший разряд. 3×3=9 в десятичной системе, а тут записана тройка, следовательно получилось 13 или 23 (пошел перенос 1 или 2 в старший разряд).
Смотрим второй разряд, там была 1, стала 2, следовательно, был перенос 1.
Теперь решаем простую задачу: в какой системе счисления 9 превратится в 13? Для это используем расширенную запись числа 13 по основанию х.
1×х + 3 = 9 → х=6
<u>Ответ:</u> основание системы счисления равно 6.