trojanxem

Untitled

Jun 5th, 2012
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. data segment
  2. wiadomosc DB "Podaj dlugosc boku a: $"
  3. wiadomosc1 DB 13,10,"Podaj dlugosc boku b: $"
  4. wiadomosc2 DB 13,10,"Podaj dlugosc boku c: $"
  5. komunikat DB 13,10,"Trojkat mozliwy do zbudowania $"
  6. komunikat1 DB 13,10,"Nie istnieje taki trojkat $"
  7.  
  8. X DB 0
  9. Y DB 0
  10. Z DB 0
  11.  
  12. ends
  13.  
  14. stack segment
  15. dw 128 dup(0)
  16. ends
  17.  
  18. code segment
  19. start:
  20.  
  21. mov dx, @DATA
  22. mov ds, dx
  23.  
  24. mov dx, offset wiadomosc
  25. mov ah, 9
  26. int 21h
  27.  
  28. mov ah,01h ;wczytywanie 1 znaku z klawiatury
  29. int 21h
  30. sub al, 30h
  31. mov X,al
  32.  
  33. mov dx, offset wiadomosc1
  34. mov ah, 9
  35. int 21h
  36.  
  37. mov ah,01h ;wczytywanie 2 znaku z klawiatury
  38. int 21h
  39. sub al, 30h
  40. mov Y,al
  41.  
  42. mov dx, offset wiadomosc2
  43. mov ah, 9
  44. int 21h
  45.  
  46. mov ah,01h ;wczytywanie 3 znaku z klawiatury
  47. int 21h
  48. sub al, 30h
  49. mov Z,al
  50.  
  51.  
  52.  
  53. mov al,X ;wpisanie zmiennych do rejestru
  54. mov bl,Y
  55.  
  56.  
  57.  
  58. add al, bl ;dodaj X+Y
  59. cmp al, cl
  60. jb info:
  61. ja dalej:
  62.  
  63. dalej:
  64. mov cl, Z
  65. add bl, cl
  66. cmp bl, al
  67.  
  68. ja dalej1:
  69. jb info:
  70.  
  71. dalej1:
  72. add al, cl
  73. cmp al,bl
  74. jb info:
  75. ja koniec:
  76.  
  77. koniec:
  78. mov dx,offset komunikat
  79. mov ah,9
  80. int 21h
  81.  
  82. info:
  83. mov dx,offset komunikat1
  84.  
  85. mov ah,9
  86. int 21h
  87.  
  88. mov ax, 4c00h
  89. int 21h
  90.  
  91. ends
  92.  
  93. end start
Advertisement
Add Comment
Please, Sign In to add comment