Вопрос Не знаю, как решить задачу. Язык pascal. Помогите пожалуйста.

C

CCYYKKAA

Capitan
Регистрация
24 Окт 2013
Сообщения
80
Репутация
0
Спасибо
0
Монет
0
Даны итоги успеваемости 24 студентов в виде их среднего балла. Вывести фамилии тех студентов, чей средний балл ниже 3,3.

Я знаю как вводить и выводить данные в матрицу и как ее делать, но я не понимаю, как происходит связь между ячейкой фамилии и ячейкой балл.
Заранее спасибо за помощь!
 
Сортировка по дате Сортировка по голосам
Если данные вводятся пользователем, можно воспользоваться следующим кодом: program Tablitsa1; var name,itog:string; ball:real; i:integer; begin for i:= 1 to 24 do begin Readln(name); Readln(ball); if ball < 3.3 then itog := itog + name + Chr(13); end; Writeln(itog); end. если данные принципиально надо записать в массив (хотя в данном случае это неоптимально) используй следующий код: program Tablitsa2; var name:array[1..24] of string; ball:array[1..24] of real; i:integer; begin for i:= 1 to 24 do Readln(name); for i:= 1 to 24 do Readln(ball); for i:= 1 to 24 do if (ball < 3.3) then Writeln(name); end.
 
Позитивный голос 0
Два массива - один с типом string, другой с integer,или один массив с записями, что несколько элегантнее.
 
Позитивный голос 0
Связь простая, по индексу строки, если таблица организована в виде двух столбцов вида Фамилия - Балл. Тогда в цикле по строкам проверяете значение в столбце "Балл" и, если это значение меньше 3.3 выводите значение из столбца "Фамилия". Все!
 
Позитивный голос 0
Войдите или зарегистрируйтесь для ответа.
Назад
Сверху