52 мб = 52 * 1024 кб = 53248 кб
24576 бит = 24576 / 8 байт = 3072 байт = 3072 / 1024 кбайт = 3 кбайта
Операторы делают следующее: а присвоить 3. Если а меньше 4,то увеличить а на 2, следовательно значением переменной A после выполнения операторов будет 5.
А)сохранение текста , потому что при сохранении не происходят нужные процессы
Const
n=10;
var
i,m,k:integer;
a:array[1..n] of integer;
begin
Randomize;
Write('Исходный массив: ');
for i:=1 to n do begin a[i]:=Random(90)+10; Write(a[i],' ') end;
Writeln;
Writeln('Введите целое число: '); Read(m);
k:=0;
for i:=1 to n do
if a[i]<m then Inc(k);
Writeln('Количество чисел, меньших ',m,' равно ',k)
end.
Тестовое решение:
Исходный массив: 42 89 49 25 96 87 94 93 41 28
Введите целое число:
50
Количество чисел, меньших 50 равно 5
13) 2
14)1
15)3
16)1
17)2
18) 2,3,4,6
19) 1. - в, г, д
2.- а,б,в
20) 1.- а, г
2.- б,в
21) а
22) а