Решение
задачи:
<span><span> </span>поле фамилия,
имя, отчество, образование – текстовые;
</span><span>поле дата
рождения – поле типа даты/время;
</span><span><span> </span>поле членство
в профсоюзе – логическое;
</span><span><span> </span>поле пол
может быть как текстовым, так и логическим (например, 1 – жен., 0 –
муж.).</span>
5 возведи в квадрат, так как только 2 цифры(0 и 1) =25;
//Pascal ABC.NET v3.1 сборка 1172
begin
Var seq:=SeqWhile(ReadInteger(),x -> ReadInteger(),x -> x<>0).ToArray;
writeln(seq.Select((x,i)->Rec(x,i+1)).Where(x->x.Item1=seq.Min).Select(x->x.Item2));
end.
Пример ввода:
2
3
4
0
Пример вывода:
<span>[1]</span>
потребуется 13 цыфр!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!