Найти, сколько отрицательных элементов массива A={a[i]} удовлетворяют условию: c<=a[i] <=d

@dane.yeah · Регистрация: 08.04.2012

Author24 — интернет-сервис помощи студентам

В поиске решения так и не нашёл. Пришлось писать тут.
Ибо не знаю как решить данную задачу.

Собственно нужно так чтобы всё было в pascal и asm, на паскале, си и других языках легко всё сделалось, а вот с ассемблером какая-то запара, прошу помощи.

Кликните здесь для просмотра всего текста

Pascal

program qq;
    uses crt;
    var
        a: array[1..10] of integer;
        c, d, asmcount: integer;
        i, count: byte;
    label
        m1,m;
    begin
        clrscr;
        write ('Enter "c": ');
        readln (c);
        write ('Enter "d": ');
        readln(d);
        randomize;
        for i:=1 to 10 do begin
            a[i]:= random (20) - 5;
                write (a[i],#32);
            if a[i] in [c..d] then
                inc(count)
        end;
        writeln ('Pascal elements  >= ', c,' and  <= ',d,'  = ', count);
        asmcount:=0;
        asm
            //тут собственно код ассемблера, ответ надо засунуть в asmcount
        end;
        writeln ('ASM elements  >= ', c,' and  <= ',d,'  = ', asmcount);
        readln;
    end.

Как я понимаю для начала надо реализовать пару вещей, например задать массив и шаги в нём

Assembler

1	mov cx, 10

ну и естественно вопросы такие как в массиве выбрать определённый промежуток c - d и найти в уже в нём отрицательные элементы, тут я думаю команды jle и loop подойдут, но как ими пользоваться не пойму, заранее спасибо

	05.06.2014, 18:43