Поместить в массив запись с именем tovar с полями kod (тип -integer), nazvanie ( тип -string), cena (тип -real). Вывести название товаров, цена которых меньше заданной. Сделать разбивку товаров по виду товара – российский или импортный. При вводе дополнительно запрашивать «национальность» товара, далее, для российского запрашивать город, для импортного – страну.