Пусть объявлены переменные файлового типа: Type Sklad = Record Num : String [10]; Count : Integer;

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку