Курсовая работа: Системы счисления и коды

WriteLn(FileOut,’Исходные данные:’);

WriteLn(FileOut,’ Число1 :’,BaseToInt(HEX1,16));

WriteLn(FileOut,’ Число2 :’,BaseToInt(HEX2,16));

WriteLn(FileOut);

WriteLn(FileOut,’Pезультатвыполненияпрограммы:’);

WriteLn(FileOut,’ Сложение :’,BaseToInt(ResPlus,16));

WriteLn(FileOut,’ Вычитание:’,BaseToInt(ResMin,16));

Cloose(FileOut);

end.

Файл исходных данных ( in.txt)

25

-30

Файл результата работы программы ( out.txt)

Исходные данные:

Число 1 : 25

Число 2 : -30

Результат выполнения программы:

Сложение :-5

Вычитание:55