Только хорек( ест и то и другое)
60.Жесткий диск 61.Диск 62 .память этого человека
Var a: array[1..6] of integer;
i, k, d, v, n: integer;
begin
for i:=1 to 6 do
begin
write('Введите элемент массива под номером ', i, ' = ');
readln(a[i]);
end;
k:=0;
d:=0;
v:=0;
n:=6;
for i:=1 to n do
if a[i]=0 then
k:=k+1
else
if a[i]>0 then
d:=d+1
else
if a[i]<0 then
v:=v+1;
writeln('Количество нулевых = ', k);
writeln('Количество положительных = ', d);
writeln('Количество отрицательных = ', v);
end.
Ответ:
10
Объяснение:
Сложные высказывания, содержащие общее отрицание, полезно вначале преобразовывать, используя правило де-Моргана.
НЕ( (x ≥ 12) ИЛИ (x ПРОСТОЕ) )
НЕ(x ≥ 12) И НЕ(x ПРОСТОЕ)
Теперь "НЕ" имеют простые высказывания, выполним их инверсию (отрицание).
(x < 12) И (x НЕ ПРОСТОЕ)
Итак, нужно найти наибольшее число, для которого верно (истинно) полученное высказывание. Поскольку число меньше 12, будем рассматривать ряд чисел 11, 10, 9, ... и выберем первое встретившееся число, не являющееся простым. 11 - простое, а вот 10 - нет, оно имеет делители 2 и т.д. Поэтому ответ - 10.