Задание 5 Параграф 21 ГДЗ Семакин 9 класс (Информатика)

Ниже вариант решения задания из учебника Семакин, Залогова 9 класс, Просвещение:

5. По условиям чемпионата, из Премьер-лиги выбывают две последние в турнирной таблице команды. Составьте программу, определяющую обе команды, выбывающие из Премьер-лиги.

program Premier_liga_2;

var

b: array[1..16] of integer;

team: array[1..16] of string;

minb1, minb2, nmin1, nmin2, i: integer;

begin

writeln(taskВведине названия команд и полученные ими очкиtask);

for i := 1 to 16 do

begin

write(i, taskНазвание: task); readln(team[i]);

write(taskОчки: task); readln(b[i]);

end;

minb1 := b[1]; nmin1 := 1;

for i := 2 to 16 do

begin

if b[i]

begin

minb2 := minb1; nmin2 := nmin1;

minb1 := b[i]; nmin1 := i;

end;

end;

writeln(taskВыбывающие команды: task, team[nmin1], task и task, team[nmin2])

end.