4 года назад

Записать комментарий каждой строки программы на эвм Add AX,[DI] Mov [SI],CI Mov[DI],DI Jmp AX Call BX

1 ответ:

Iricha1234 года назад

0 0

Add AX,[DI] - Прибавляет к регистру AX значения по адресу DI
Mov [SI],CI - Перемещение значения из регистра CI по адресу [SI]
Mov[DI],DI - Перемещение значения из регистра DI по адресу [DI]
 Jmp AX - Переход к строке под номером из регистра AX
Call BX - вызов команды под номером BX
Примерно так...

Читайте также

4. Определите и выведите на экран сумму чисел от 50 до 500, которые делятся на 7 и 13 одновременно.

Aleksandra91

//PascalABC.NET
//Версия 3.3, сборка 1611
begin
write('sum=',range(50,500).Where(x->(x mod 7=0) and (x mod 13=0)).Sum());
end.

0 0

4 года назад

Прочитать ещё 2 ответа

Разработайте скрипт с анимацией и событиями, используя костюмы и сцену

Love shot

Когда щёлкнешь по зеленому флажку

Всегда [8] шагов (можете [10] шагов)

Повторить [2] раза

Сменить на [1] костюм

Идти в точку - 123_31

Выбрать костюм [2]

Идти [8] шагов (можете [10] шагов)

Сменить на [3] костюм (Костюм мышки)

0 0

4 года назад

Найдите значение z после выполнения программы x:=15 если x>15 то x:=x+3 иначе х:=х-3 все y:=x+2 нц для i от 1 до 3 y:=y+3 кц

Cassie [15]

Правильный ответ 12,сама проходила это

0 0

4 года назад

даны 10 произвольных действительных числа(вводятся с клавиатуры).Подсчитать количество отрицательных чисел помогите составить пр

Колокольчик [7]

var a,s,i:integer;
begin
s:=0;
for i:=1 to 10 do
begin
write('Число: '); readln(a);
if a<0 then s:=s+1;
end;
writeln('Кол-во отрицательных чисел: ',s);
end.

0 0

4 года назад

Паскаль Дано четырёхзначное число. Напишите программу которая выводит на экран самое большое число, которое можно составить из ц

Эвгений18 [4]

Var
a:array[1..4] of integer;
b,i,i2,max:integer;
Begin
Readln(b);
a[1]:= b div 1000;
a[2]:= b div 100 mod 10;
a[3]:= b div 10 mod 10;
a[4]:= b mod 10;
max:=1;
for i2:=1 to 4 do begin
for i:=1 to 4 do if a[max]<a[i] then max:=i;Write(a[max]);
a[max]:=0;
End;
End.

0 0

3 года назад