16 символов - 4 бита.
4*74 = 296 битов.
296/8=37 байт
Var ar:array[1..10] of integer;
ar1:array[1..10] of integer;
ar2:array[1..10] of integer;
i,n1,n2:integer;
begin;
randomize;
writeln('First array:');
for i:=1 to 10 do begin;
ar[i]:=random(10,99);
if odd(ar[i]) then //если нечётно
begin;
inc(n1);
ar1[n1]:=ar[i];
end
else
begin;
inc(n2);
ar2[n2]:=ar[i];
end;
write(ar[i]:4);
end;
writeln;
writeln('Array A:');
for i:=1 to n1 do
write(ar1[i]:4);
writeln;
writeln('Array B:');
for i:=1 to n2 do
write(ar2[i]:4);
end.<span>
</span>
1. Реклама приходящая на эл почту попадает в эту папку ответ спам
2. Его еще называют паутиной ответ интернет
3. Помогает вводить слова ответ Т9
4. Он блокирует шок рекламу ответ AdBlock
1)MS Word - прикладной пакет программ
2)Norton Antivirus - Сервисное ПО
3)Paint - Графический редактор
4)Pascal ABC - Системы программирования
5)Windows-2010 - Системное ПО
6)Антивирусная программа- Сервисное ПО
7)Блокнот - Текстовый редактор (текстовое ПО)
8)Игра "Сапер" - Прикладные программы
9)Клавиатурный тренажер - Прикладные программы
10)Программа Проводник - Инструментальное ПО
11)Проигрыватель Windows Media - Сервисное ПО
12)Электронный словарь - Прикладное ПО