задача на записи2 |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
задача на записи2 |
RAPON |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 47 Пол: Мужской Репутация: 0 |
Опишите, используя структуру записи, школьный журнал.Предусмотрите в записи поля для хранения информации о фамилии учащегося, предмете, оценке. Составьте программу, считывающую с клавиатуры данные об успеваемости учащихся класс и выводящую на экран сведения об отличниках класса, о средней успеваемости учащихся класса.
Мне непонятен момент связанный с предметом.. Предмет должен одинаковый для всех? Если представить что предметов несколько то тогда зачем под предмет отводить одно поле..? Сообщение отредактировано: RAPON - |
RAPON |
Сообщение
#2
|
Новичок Группа: Пользователи Сообщений: 47 Пол: Мужской Репутация: 0 |
Const n=4;m=2;
Type Gurnal=record Familia:string; Predmet:array[1..n] of string; Ozenka:array[1..m] of byte; End; Var I,g:integer; A:array[1..n] of gurnal; Begin For i:=1 to n do Begin With a[i] do Begin Readln(familia); … как организовать ввод данных в массивы predmet и ozenka? |
Текстовая версия | 26.04.2024 10:38 |