Word и так имеет такой тип
Как бы не чего переделывать
<span>Решение данной задачи прикреплено ниже.
zd15 - решение первой задачи.
zd16 - решение второй задачи.</span>
Нда,просто изи.........................
Var a, b: integer;
begin
write('Введите два числа: ');
read(a, b);
writeln(a, ' + ', b, ' = ', a + b);
writeln(a, ' - ', b, ' = ', a - b);
writeln(a, ' * ', b, ' = ', a * b);
writeln(a, ' / ', b, ' = ', a / b);
<span>end.</span>