Позиционными называют системы счисления, алфавит которых содержит ограниченное число символов, а значение каждой цифры числа определяется ее местоположением в числе. например, десятичное число 545 означает 5 сотен, 4 десятка и 5 единиц.
Рафаэль633
13.08.2021
Const handsfree = false; nmax = 31; random_min = -20; random_max = 30; var a: array[1..nmax] of real; i, n, j: integer; k: integer; begin {ввод массива} if handsfree then n : = random(nmax - 5) + 5 else begin write('n = '); readln(n); end; writeln('данные массива: '); for i : = 1 to n do begin if handsfree then begin a[i] : = random(random_max - random_min) + random_min; write(a[i], ' '); end else readln(a[i]); end; writeln(); {подсчет элементов} k : = 0; for i : = 1 to n do if a[i] = 15 then k : = k + 1; writeln('quantity = ', k); end.