|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
типизированный файл
ребята,тут такая замутка
задание анкетирование надо к одной фамилии студента,присвоить 7 предметов и 7 отметок полезности как это сделать? |
#2
|
||||
|
||||
Структуры спасут гиганта мысли.
Некоторые программисты настолько ленивы, что сразу пишут рабочий код. Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты. |
#3
|
|||
|
|||
и о чем же это ты?
|
#4
|
||||
|
||||
Примерно о таком:
Код:
Type TDiscipline = record Name: String; Point: Integer; end; TTestBook = record FIO: String[50]; Discipline: Array[1..7] of TDiscipline; end; Var A: Array[1..2] of TTestBook; begin with A[1] do begin FIO := 'Иванов Иван Иванович'; Discipline[1].Name := 'Информатика'; Discipline[1].Point := 2; Discipline[2].Name := 'Физика'; Discipline[2].Point := 4; end; with A[2] do begin A[2].FIO := 'Петров Петр Петрович'; A[2].Discipline[1].Name := 'Информатика'; A[2].Discipline[1].Point := 5; end; end. Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#5
|
|||
|
|||
спасибо ребят
|