Рутинные несколько задач, которые нужно решить не написать ответы расписать, Надеюсь на вашу Рутинные несколько задач, которые нужно решить не написать ответы расписать, дам максимум ба">

Const n=3;
type lec=record
name:string;
cost:integer;
end;
var a:array [1..n] of lec;
max1:integer;
m,k,p,i:byte;
begin
for i:=1 to n do
with a[i] do begin
writeln ('Введи наименование товара');
readln (name);
writeln ('введи стоимость товара');
readln (cost);
end;
max1:=-1;
for i:=1 to n do
if a[i].cost>max1 then begin max1:=a[i].cost;
p:=i;
end;
while k<>1 do begin
for i:=1 to n do
if (i<>p) and (a[i].cost=max1) then begin m:=i;
k:=1;
end;
max1:=max1-1;
end;
writeln (a[p].name,' ',a[p].cost);
write (a[m].name,' ',a[m].cost);
readln;
end.

Все клавиши можно условно разделить на несколько групп: 
функциональные клавиши; 
Функциональные клавиши F1 — F12, размещенные в верхней части клавиатуры, заранее запрограммированы на выполнение определённых действий. Так, очень часто клавиша F1 служит для вызова справки. 
символьные (алфавитно-цифровые) клавиши; 
В центре расположены символьные клавиши, очень похожие на клавиши обычной пишущей машинки. На них нанесены цифры, специальные символы (!, :, * и так далее) , буквы русского алфавита, латинские буквы переключения алфавитов зависит от настройки клавиатуры компьютера. Чаще всего применяется одна из следующих комбинаций клавиш: 
Alt слева + Shift или Ctrl + Shift. 
Знак “+” между названиями клавиш означает, что требуемое действие выполняется только в том случае, если в нажатом состоянии будут находиться обе клавиши. Выполнять клавиатурные комбинации можно так: нажать первую из указанных клавиш и, удерживая ее нажатой, нажать вторую клавишу; обе клавиши отпустить. 
С символьных клавиш вы будете набирать всевозможные тексты, арифметические выражения, записывать свои программы. 
Буквы каждого алфавита могут быть прописными (большими) или строчными (маленькими) . Переключают режим ввода букв нажатием клавиши Caps Lock. Если горит индикатор Caps Lock – будут вводиться прописные буквы, иначе – маленькие. 
Вводить одну или несколько больших букв удобно с комбинации клавиш Shift + {буква}. 
В нижней части клавиатуры находится большая белая клавиша – пробел. Пробел используется для отделения слов и выражений друг от друга. 
клавиши управления курсором; 
Курсор ввода ( | ) – мигающая черточка, отмечающая место ввода очередного символа на экране монитора. Для перемещения курсора по тексту служат курсорные стрелки. Они перемещают курсор на одну позицию в заданном направлении. 
Клавиши PageUp и PageDown позволяют листать документ вверх и вниз, а Home и End переводят курсор в начало и конец строки. 
специальные клавиши; 
Специальные клавиши не собраны в одну группу, а размещены так, чтобы их было удобно нажимать. 
Клавиша Enter завершает ввод команды и вызывает ее выполнение. При наборе текста служит для завершения ввода абзаца. 
Esc – клавиша расположена в левом верхнем углу клавиатуры. Обычно служит для отказа от только что выполненного действия. 
Клавиши Shift, Ctrl, Alt изменяют действия других клавиш. 
дополнительная клавиатура. 
Дополнительная клавиатура – при включенном индикаторе NumLock удобная клавишная панель с цифрами и знаками, расположенными, как на калькуляторе. 
Если индикатор NumLock выключен, то работает режим управления курсором.