Напишите на Паскале программу, которая будет считывать информацию о футболистах команды Бублик . Пользователь сначала

Название: Программа на Паскале для подсчета футболистов и их голов

Пояснение:
Для решения данной задачи на Паскале, понадобится использование циклов, условий и переменных. Программа будет считывать данные о футболистах, а затем проверять, сколько из них родились в период с 1998 по 2000 годы и сколько из них не забили мячей. Для этого будет использоваться цикл for для ввода информации о каждом футболисте, а затем будет проверяться условие рождения и количество голов. Если футболист соответствует условию рождения и не забил мячей, количество таких футболистов будет увеличиваться на 1.

Пример:

pascal

program FootballTeam;

var

  N, i, count, maxGoals, maxIndex : integer;

  name, surname : string;

  birthYear, goals : integer;

begin

  writeln("Введите количество футболистов: ");

  readln(N);

  

  count := 0;

  maxGoals := 0;

  

  for i := 1 to N do

  begin

    writeln("Введите информацию о футболисте: ");

    readln(surname, name, birthYear, goals);

    

    if (birthYear >= 1998) and (birthYear <= 2000) and (goals = 0) then

      count := count + 1;

    

    if goals > maxGoals then

    begin

      maxGoals := goals;

      maxIndex := i;

    end;

  end;

  

  writeln("Количество футболистов, родившихся в период с 1998 по 2000 годы и не забивших голы: ", count);

  writeln("Фамилия и имя футболиста, набравшего наибольшее количество голов: ", surname, name);

  writeln("Количество забитых голов: ", goals);

end.

Совет:
Для успешного решения задачи, важно внимательно следовать условиям и правильно использовать условные операторы. Проверьте, что вы правильно обозначили переменные и правильно выполнили все вычисления, а также протестируйте программу с различными тестовыми случаями.

Задача на проверку:
Напишите программу на Паскале для подсчета футболистов и их голов, используя данные о 5 футболистах команды "Бублик". Пользователь должен ввести информацию обо всех футболистах, включая фамилию, имя, год рождения и количество голов. После ввода информации, программа должна вывести количество футболистов, родившихся в период с 1998 по 2000 годы и не забивших голы, а также фамилию и имя футболиста, который забил наибольшее количество голов.