Нужно сделать описание (сбоку от кода) на языке к кода , написанные на языке программирования ассамблер
section .text
global _start
_start:
mov esi,fibo
mov eax, 1
mov ebx, 1
ischo: xpr ecx,ecx
add ecx,eax
add ecx,ebx
js a
mov [esi], eax
call outeax
inc esi
inc esi
inc esi
inc esi
mov eax, ebx
mov ebx, ecx
jmp ischo
a: mov [esi], eax
call outeax
inc esi
inc esi
inc esi
inc esi
mov [esi], ebx
mov eax, ebx
call outeax
inc esi
inc esi
inc esi
inc esi
mov [esi], ecx
mov eax,1
mov ebx,0
int 80h
outeax:
; push eax
; mov [tmp],ax
push eax
push ebx
push ecx
push edx
mov ebx, 10
mov edi, stroka
add edi, 19
aga: xor edx, edx
div ebx
push eax
add edx, 30h
mov [edi], di
dec edi
pop eax
cmp eax, 0
jne aga
mov eax,4
mov ebx,1
mov ecx,stroka
mov edx, 21
int 80h
pop edx
pop ecx
pop ebx
pop eax
ret
section .data
tmp dw 0
stroka times 20 db 0
str_len dd 20
fibo times 100 dd 0
По закону дистрибутивности раскроем скобки
(Av¬A)&(AvB)
Av¬A = 1, значит остаётся AvB
2) F =A&(¬AvB)
По тому же закону раскрываем скобки
(A&¬A)v(A&B)
A&¬A = 0, значит остаётся A&B
3. (AvB)&(¬BvA)&(¬CvB)
По закону склеивания (AvB)&(¬BvA) = A , получается, что выражение принимает вид
A&(¬CvB)
Можно раскрыть скобки, получим
A&¬C v A&B
4) F =(1v(AvB))v((AC)&1)
Скобка (1v(AvB)) = 1, так как 1 v ЧТОУГОДНО = 1
Получаем выражение
1v((AC)&1) = 1, так как 1 v ЧТОУГОДНО = 1
ответ 1
uses crt;
Var mas:array[1..1000, 1..1000] of integer;
N,M,i,j,k:integer;
Begin
Writeln('Введите размер матрицы N*M');
Write('N = ');
readln(N);
Write('M = ');
readln(M);
if (M>1000) or (N>1000) or (M<1) or (N<1)
then
Writeln('Ошибка, указанные значения выходят за пределы матрицы') else
Begin
Writeln('Введите элементы матрицы');
k:=0;
for i:=1 to N do
for j:=1 to M do
Begin
readln(mas[i,j]);
if (mas[i,j] mod 2 = 0) then k:=k+1;
end;
Writeln();
Writeln('Исходная матрица');
for i:=1 to N do
Begin
for j:=1 to M do
Begin
Write(mas[i,j], ' ')
end;
Writeln();
end;
Writeln();
Writeln('Количество четных элементов = ',k);
end;
readln;
end.