Работа 3.9 Упр.3 ГДЗ Семакин 10 класс (Информатика)

Получить список учеников музыкальной школы, которые учатся играть на скрипке. Указать также, сколько лет они занимаются музыкой и принимали ли участие в каких-либо конкурсах.

Нужно вывести только тех учеников, у которых инструмент — скрипка. Для каждого такого ученика указываем фамилию и имя, участие в конкурсах и сколько лет он занимается музыкой.

Подходящий вариант программы:

const n=3;
type
  Uch=record
    Fio, konkurs, let, instrument:string;
  end;
var
  x: array[1..n] of Uch;
  i: word;
begin
  Writeln(‘kol uchenikov ‘, n);
  for i:=1 to n do
  begin
    Writeln(‘Vvedite instrument’);
    Readln(x[i].instrument);
    Writeln(‘Vvedite Fio’);
    Readln(x[i].Fio);
    Writeln(‘Vvedite Konkurs’);
    Readln(x[i].konkurs);
    Writeln(‘Vvedite skolko let igraet na skripke’);
    Readln(x[i].let);
    if x[i].instrument <> ‘скрипка’ then
      Writeln(‘NO’)
    else
    begin
      Writeln(i, ‘ Человек’);
      Writeln(‘IN Spisok’);
      Writeln(‘ФИО: ‘, x[i].Fio);
      Writeln(‘Участвовал в конкурсах: ‘, x[i].konkurs);
      Writeln(‘Занимается музыкой: ‘, x[i].let);
    end;
  end;
end.

В программе используется запись с полями Fio, konkurs, let, instrument. Затем для каждого элемента массива проверяется условие $$x[i].instrument = ‘скрипка’$$. Если условие выполняется, данные ученика выводятся в список.

Ответ: программа, отбирающая учеников, играющих на скрипке, и выводящая их ФИО, участие в конкурсах и стаж занятий музыкой.