Ответ: Turbo Pascal
ты просто все переменые описал как integer, тоесть как числа и хочешь чтобы Имя директора(или кого там) сохранило как число.
Вывод:
вместо var direct,my_name,cel,date,zav,spec,opit,dolg,oplata:integer;
написать var direct,my_name,cel,date,zav,spec,opit,dolg,oplata:string;