Program n;
var
m: array[1..10] of integer;
i,k: integer;
begin
writeln('Введите массив');
k:=0;
for i:=1 to 10 do begin
readln(m[i]);
if m[i]>0 then k:=k+1;
end;
writeln(k);
<span>end.
<em>Если я помогла,то отметь мой ответ лучшим,пожалуйста</em></span>
<span>Малая цифровая вычислительная машина.
ЭВМ</span>
25 (10cc) =2^4+2^3+2^0 =11001 (2cc)
19 (10cc)=2^4+2^1+2^0=10011 (2cc)
-----------------------------------------------------
используя формулу А→В =¬А+В приводим данную формулу в условии к виду:
(X&25=0)+(X&19≠0) + (Х&A≠0)=1
рассмотрим случай, когда
(Х&25 =0) +(X&19≠0) =0 и (Х&A≠0)=1
-------------------------------------------------------------------------------------------------
так как 25 = 11001, то (X&25=0) = 0 (т.е. конъюнкция будет "ложь")
при Х={1; 1000; 1001; 10000; 10001; 11000; 11001}
так как 19=10011, то (Х&19≠0) = 0 при
X={100; 1000; 1100}
общее значение : Х=1000 (2сс) = 8 (10сс)
------------------------------------------------------------------------------------------------
ответ 8
Информация-любые сведения об окружающем мире, полученные с помощью органов чувств. Теория информации - раздел, занимающийся вопросами хранения, обработки и передачи информации.алгоритм-план. 4 и 5 не знаю:С
Оператор условия.
Если (действие, утверждение), то.... иначе....