СРОЧНО 40 БАЛЛОВ !!
С клавиатуры вводится число N, обозначающие количество футболистов команды "Бублик", а затем- строк, в каждый из которых - информация об одном футболисте в такой формате:
<Фамилия> <Имя> <год рождения> <голы>
Данные разделяются одним пробелом. Нужно подсчитать, сколько футболистов, родившихся в период с 1998 по 2000г., не забили мячей вообще.

это переменная m

именно? скинь номер строки

он про 28 и т д

слишком сложно. вроде

var f, n: string; N,x,y,i,s:integer;begin; readln(N); for i:=1 to N do begin readln(f,n,x,y); if (y>1998) and (y<2000) and (x=0) do s:=s=1; end; writeln(s);end.

Реализация на Pascal