Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.82/11: Рейтинг темы: голосов - 11, средняя оценка - 4.82
0 / 0 / 0
Регистрация: 06.05.2015
Сообщений: 2

Как вывести список учеников с указанием ФИО и даты рождения?

10.05.2015, 23:59. Показов 2357. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Например: "Андрей Андреевич (01.01.2001)"

вот моя прога, но здесь что-то не так. я не знаю что мне в конце изменить (
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var 
x: Array [1..30] of klass;
i, n: Integer;
begin
write ('Введите кол-во учеников: '); Readln (n);
for i:=1 to n do
with x[i] do
begin
Write ('Введите ФИО: '); Readln (fio);
Write ('Дату рождения: '); Readln (data);
end;
Writeln ('Список учеников: ');
For i:=1 to n do
Writeln (x[i].fio);
Readln
End.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
10.05.2015, 23:59
Ответы с готовыми решениями:

Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения
Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения. он не просит ввести дату рождения и не...

Распечатать список студентов, фамилии которых начинаются на букву В, с указанием даты их рождения
Распечатать список студентов, фамилии которых начинаются на букву В, с указанием даты их рождения.

Распечатать список студентов, фамилии которых начинаются с буквы Б, и их даты рождения
Распечатать список студентов, фамилии которых начинаются с буквы Б, и их даты рождения. I: INTEGER; begin for I := 1 TO N DO ...

3
CAPITAL OF ROCK!
 Аватар для JokeR.BY
1281 / 708 / 982
Регистрация: 03.03.2010
Сообщений: 2,286
11.05.2015, 01:05
перед тем как копировать кусок кода откуда-то там - копируйте-то хоть до конца)
1
2511 / 1132 / 582
Регистрация: 07.06.2014
Сообщений: 3,286
11.05.2015, 07:37
Кококо,
Цитата Сообщение от Кококо Посмотреть сообщение
Pascal
1
x: Array [1..30] of klass;
вы забыли описание типа klass приложить.
в начале программы должно быть что-то вроде:
Pascal
1
2
3
4
Type klass=record
    fio:string[50];
    data:string[10];
  end;
0
12.05.2015, 17:24

Не по теме:

Кококо, вероятно, просто забыл скопировать описание класса. По всей видимости, эта его программа является переделкой программы из его темы: Вывести список людей, рожденных в четный день недели

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.05.2015, 17:24
Помогаю со студенческими работами здесь

Вывести результат random даты рождения каждого человека на экран!
Помогите вывести результат random даты рождения каждого человека на экран!!!!!! type data = record number: 1..31; ...

Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения
Распечатать список учеников, фамилии которых начинаются на букву В, с указанием даты их рождения.

Вывести список студентов, год рождения которых больше среднего года рождения группы и месяц рождения меньше 8
Составить программу, которая обеспечивает ввод с клавиатуры и запись во внешний файл следующей информации о студентах: фамилия, дата,...

Вывод списка учеников, фамилии которых начинаются с буквы «В» с указание даты рождения
привет, ребят! очень нужна задачка, не поможете? Написать программу , в которой хранятся сведения об учениках (фио, адрес, дата...

Расчитать средний бал каждого по всем предметам и вывести фио учеников чей средний балл выше
Здравствуйте я пытался написать програму код будет ниже нужно сделать чтобы он с клавы в файл читал что введут с клавиатуры а имено:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru