껠 '
cls
( ) ?
( ) ?
N: = 0 n = 0
렠 do
(Fam, r, v) read famS, r, v
Fam = 䠠 if fam$ = then exit do
(Fam, v) ? fam$, v, r
N:=N+1 n = n+1
N == 1 V < Vmin  if n=l or v < vmin then
Vmin: =
V vmin = v
Fmin: =
Fam fmin$ = fam$
堠 end if
렠 loop
( :) ? :
(Fmin, Vmin) ? fmin$, vmin
end
, .