Тип даных Опции

[Desktop II]

....

Сообщение отредактировано: Desktop II - 6.04.2006 16:37

[volvo]

Как правильно написать условие что бы исключить из списка студентов у которых больше одной двойки ?

Что-то такого типа:

var count_2: integer;
...
s1:=poch;
while s1<>nil do begin

  count_2 := 1;
  for   i:= 1 to 4 do if s1^.y.ocinky[i] = 2 then dec(count_2);
  if count_2 < 0 then { данные, на которые указывает s1, нужно удалять }

  s1:=s1 ^.cc;
end;