program Project2;
type
Pupil = record
age: Integer;
secondName: string;
end;
var
i : Integer;
pupils: array [1..15] of Pupil;
newPupil : Pupil;
begin
for i := 1 to 15 do begin
ReadLn(pupils[i].secondName);
ReadLn(pupils[i].age);
end;
ReadLn(newPupil.secondName);
ReadLn(newPupil.age);
for i := 1 to 15 do
if (pupils[i].age <= newPupil.age) then begin
WriteLn(pupils[i - 1].secondName);
break;
end
end.
cHJvZ3JhbSBQcm9qZWN0MjsKCnR5cGUKICBQdXBpbCA9IHJlY29yZAogICAgYWdlOiBJbnRlZ2VyOwogICAgc2Vjb25kTmFtZTogc3RyaW5nOwogIGVuZDsKCnZhcgogIGkgOiBJbnRlZ2VyOwogIHB1cGlsczogYXJyYXkgWzEuLjE1XSBvZiBQdXBpbDsKICBuZXdQdXBpbCA6IFB1cGlsOwpiZWdpbgogIGZvciBpIDo9IDEgdG8gMTUgZG8gYmVnaW4KICAgIFJlYWRMbihwdXBpbHNbaV0uc2Vjb25kTmFtZSk7CiAgICBSZWFkTG4ocHVwaWxzW2ldLmFnZSk7CiAgZW5kOwoKICBSZWFkTG4obmV3UHVwaWwuc2Vjb25kTmFtZSk7CiAgUmVhZExuKG5ld1B1cGlsLmFnZSk7CgogIGZvciBpIDo9IDEgdG8gMTUgZG8KICAgIGlmIChwdXBpbHNbaV0uYWdlIDw9IG5ld1B1cGlsLmFnZSkgdGhlbiBiZWdpbgogICAgICBXcml0ZUxuKHB1cGlsc1tpIC0gMV0uc2Vjb25kTmFtZSk7CiAgICAgIGJyZWFrOwogICAgZW5kCmVuZC4K
0JjQstCw0L3QvtCyCjE4MArQmtGA0YvQu9C+0LIKMTc5CtCf0Y/RgtC60LjQvQoxNzgK0J8KMTc3CtCSCjE3NgrQkwoxNzUK0KEKMTc0CtCX0JcKMTczCtCX0KHQnAoxNzIK0JLQkNCSCjE3MQrQktCg0JAKMTcwCtCe0KDQnwoxNjkK0J7QoNCf0JUKMTY4CtCS0J/QoNCe0JLQkNCf0KAKMTY3CtCe0JvQoNCr0JLQm9CgCjE2NArQndCe0JLQq9CZCjE2OCA=
Иванов
180
Крылов
179
Пяткин
178
П
177
В
176
Г
175
С
174
ЗЗ
173
ЗСМ
172
ВАВ
171
ВРА
170
ОРП
169
ОРПЕ
168
ВПРОВАПР
167
ОЛРЫВЛР
164
НОВЫЙ
168