Перейти к содержанию

smileman

Пользователи
  • Постов

    89
  • Зарегистрирован

  • Посещение

Сообщения, опубликованные smileman


  1. assume cs:cseg,ds:cseg,ss:cseg,es:cseg
    .org 100h

    start:

    xor dx,dx
    xor bx,bx
    mov ah,08h
    int 21h

    sub al,30h
    mov bl,al

    mov ah,08h
    int 21h

    mov bh,al
    sub al,30h
    add bl,bh

    mov dl,bl
    add dl,30h
    mov ah,02h
    int 21h
    int 20h
    end start
    cseg ends

    cseg segment ; суммирование


    cseg segment ; разница
    assume cs:cseg,ds:cseg,ss:cseg,es:cseg
    .org 100h

    start:

    xor dx,dx
    xor bx,bx
    mov ah,08h
    int 21h

    sub al,30h
    mov bl,al

    mov ah,08h
    int 21h

    mov bh,al
    sub al,30h
    cmp bh,bl
    jb m1
    sub bl,bh
    mov dl,bl
    jmp m2
    m1:
    sub bh,bl
    mov dl,bh

    m2:

    add dl,30h
    mov ah,02h ; вывод результата
    int 21h
    int 20h
    end start
    cseg ends


    cseg segment ; произведение
    assume cs:cseg,ds:cseg,ss:cseg,es:cseg
    .org 100h

    start:

    xor dx,dx
    xor bx,bx
    mov ah,08h
    int 21h

    sub al,30h
    mov bl,al

    mov ah,08h
    int 21h

    mov bh,al
    sub al,30h

    xor ax,ax
    mov ax,bl
    mul bh

    aam

    mov dl,ah
    add dl,30h
    mov ah,02h
    int 21h
    mov dl,al
    add dl,30h
    int 21h

    int 20h
    end start
    cseg ends


    cseg segment ; деление
    assume cs:cseg,ds:cseg,ss:cseg,es:cseg
    .org 100h

    start:

    xor dx,dx
    xor bx,bx
    mov ah,08h
    int 21h

    sub al,30h
    mov bl,al

    mov ah,08h
    int 21h

    mov bh,al
    sub al,30h
    cmp bh,bl
    jb m1
    div bl,bh
    mov dl,bl
    jmp m2
    m1:
    div bh,bl
    mov dl,bh

    m2:

    add dl,30h
    mov ah,02h ; вывод результата
    int 21h
    int 20h
    end start
    cseg ends

    ну примерно так, обычно писал на masme, но должно скомпилиться и в tasme

    PS Все набранное компилить не пробовал, так что наверняка ошибок там масса

  2. ну как..сначала по идее выполняется лексический анализ, затем по правилам заданной грамматики, выполняем операцию "сдвиг-свертка" над найденными лексемами по заранее заполненной таблице предшествования :) Результат - дерево разбора :) - вот это синтаксический анализ :)

  3. :) ну она правильно сказала.. '1' - тоже char, только вот:


    mes db '123', '$' ; если $ убрать
    ...
    mov AH, 09H
    mov DX, offset mes ; то выведется строка '123' и мусор следом, причем мусор будет выводиться
    int 21h;до тех пор-пока не встретится $
    ...

    :)

    Как зовут преподавательницу?

  4. assume cs:code, ds:data, ss:stacks ;ассоциируем каждый  сегмент  с именем (связуем сегментные регистры и сегменты)
    ; сегменту кода (cs) имя code, данных (ds) -data, стеку(ss) -stacks
    data segment; описываем сегмент данных
    mes db 50, 55 dup('$'); массив, символ $ - конец строки
    del db 1, 1('$') ;переменная del 1 байт со значением 1
    data ends
    stacks segment; описываем сегмент стека
    db 128 dup(?); размер стека 128 байт
    stacks ends
    code segment ;сегмент кода
    program proc Far ; процедура program типа Far -значит, что данная процедура может вызываться в другом сегменте кода

  5. Зачастую, еще в школе решается, кем человек станет, какую ячейку займет в обществе.

    Поэтому считаю, что школьник должен сам искать пути выхода из таких ситуаций..

    А представители "бокланства" редко проявляют даже попытку отобрать("сбакланить") деньги у человека, в котором чувствуется сила(я имею ввиду не обязательно физическую, духовную что ли).Да и вообще, этот вопрос представляет множество факторов, кроет собой целый ряд вопросов детской психологии. Мое мнение. Хотя может и вымогательства то уже нету) ..давненько это было)

  6. :) Изврат какой-то..без обид )) Лично я никакого смысла не вижу в этом,

    ты знаешь,что из себя представляет информация? К примеру, ASCII код символа "A" - 0x41 - по-моему :) или побитово- 01000001. Так что, читаться все равно будет как минимум пачкой - 8 бит, или 1 байт.

×
×
  • Создать...