IDENTIFICATION DIVISION.
       PROGRAM-ID. roman.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01 ARRAY.
        02 A PIC 9(4) OCCURS 7 TIMES.
        02 B PIC X OCCURS 7 TIMES.
       77 N PIC 9(4).
       77 I PIC 9(2).
       77 J PIC 9(2).
       77 Q PIC 9(3).
       77 R PIC 9(3) VALUE 1.
       PROCEDURE DIVISION.
       MAIN-PARA.
          MOVE 1000 TO A(1).
          MOVE 500 TO A(2).
          MOVE 100 TO A(3).
          MOVE 50 TO A(4).
          MOVE 10 TO A(5).
          MOVE 5 TO A(6).
          MOVE 1 TO A(7).
          MOVE "M" TO B(1).
          MOVE "D" TO B(2).
          MOVE "C" TO B(3).
          MOVE "L" TO B(4).
          MOVE "X" TO B(5).
          MOVE "V" TO B(6).
          MOVE "I" TO B(7).
          DISPLAY "ENTER ANY NUMBER: " WITH NO ADVANCING.
          ACCEPT N.
          IF (N = 0)
           DISPLAY "ZERO SHOULD NOT BE ENTERED"
           STOP RUN.
          DISPLAY "THE CORRESPONDING ROMAN NUMBER IS " WITH NO ADVANCING.
          PERFORM X-PARA VARYING I FROM 1 BY 1 UNTIL R = 0.
          DISPLAY " ".
          STOP RUN.
       X-PARA.
          DIVIDE N BY A(I) GIVING Q REMAINDER R.
          MOVE R TO N.
          PERFORM Y-PARA VARYING J FROM 1 BY 1 UNTIL J > Q.
       Y-PARA.
          DISPLAY B(I) WITH NO ADVANCING.

#!/usr/bin/env python

from sip import setapi
setapi("QDate", 2)
setapi("QDateTime", 2)
setapi("QTextStream", 2)
setapi("QTime", 2)
setapi("QVariant", 2)
setapi("QString", 2)
setapi("QUrl", 2)


from PyQt4 import QtCore, QtGui
import roman
import sys


def main():
    app = QtGui.QApplication(sys.argv)
    view = ConversionWindow()
    conversionApp = Converter(view)
    conversionApp.show()
    sys.exit(app.exec_())


class ConversionWindow(QtGui.QDialog):

    def __init__(self, parent=None):
        super(ConversionWindow, self).__init__(parent)

        layout = QtGui.QVBoxLayout()
        form = QtGui.QFormLayout()
        self._roman = QtGui.QLineEdit()
        form.addRow('&Roman', self._roman)
        self._arabic = QtGui.QLineEdit()
        self._arabic.setReadOnly(True)
        form.addRow('&Arabic', self._arabic)
        layout.addLayout(form)
        self._convertButton = QtGui.QPushButton('Co&nvert')
        self._convertButton.setAutoDefault(True)
        layout.addWidget(self._convertButton)
        self.setLayout(layout)
        self.setWindowTitle('Roman to Arabic Numeral Converter')

    def connectSignals(self, converter):
        self._convertButton.clicked.connect(converter.convert)
        converter.arabic.connect(self._arabic.setText)

    def getRoman(self):
        return self._roman.text()


class Converter(QtCore.QObject):

    arabic = QtCore.pyqtSignal(unicode)

    def __init__(self, view):
        super(Converter, self).__init__(view)
        view.connectSignals(self)

    def show(self):
        self.parent().show()

    def convert(self):

        try:
            result = unicode(roman.fromRoman(self.parent().getRoman()))
        except roman.InvalidRomanNumeralError:
            result = ""

        self.arabic.emit(result)


if __name__ == '__main__':
    main()