Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
qwerty_
0 / 0 / 0
Регистрация: 08.01.2013
Сообщений: 14
#1

Определить комбинированный тип для представления следующих данных - Turbo Pascal

16.01.2013, 16:11. Просмотров 314. Ответов 1
Метки нет (Все метки)

Определить комбинированный тип для представления следующих данных: анке-
та (ФИО, пол, возраст, курс, номер группы). Написать программу, которая вводит эту
информацию и печатает ФИО людей из заданной группы.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.01.2013, 16:11
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Определить комбинированный тип для представления следующих данных (Turbo Pascal):

Определить комбинированный тип для представления следующих данных
Определить комбинированный тип для представления следующих данных: анке- та...

Определить комбинированный тип для представления следующих данных: экзамен
Вот задача. Определить комбинированный тип для представления следующих данных:...

Определить комбинированный тип для представления следующих данных: анкета
Определить комбинированный тип для представления следующих данных: анкета...

Описать комбинированный тип данных
Описать комбинированный тип данных заданной структуры и составить программу...

Для следующих значений данных определить типы данных
Для следующих значений данных определить типы данных, указать какой объем...

Для следующих значений данных определить типы данных, указать какой объем памяти они занимают
Задание 1.Для следующих значений данных определить типы данных, указать какой...

1
Kodzaev
3002 / 1891 / 1646
Регистрация: 30.04.2011
Сообщений: 3,054
16.01.2013, 16:39 #2
Лучший ответ Сообщение было отмечено qwerty_ как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Type
  anketa=Record
  fio: String;
  pol: Char;
  voz: Byte;
  kurs: Byte;
  nom: String;
end;
Var
  x: Array[1..30] of anketa;
  i,n: Byte;
  group: String;
BEGIN
Write('Введите кол-во записей: ');
Readln(n);
For i:=1 to n do
With x[i] do
begin
  Write('ФИО: '); Readln(fio);
  Write('Пол: '); Readln(pol);
  Write('Возраст: '); Readln(voz);
  Write('Курс: '); Readln(kurs);
  Write('Номер группы: '); Readln(nom);
end;
Writeln;
Write('Введите имя группы для поиска: ');
Readln(group);
Writeln('Результат поиска:');
For i:=1 to n do
If x[i].nom=group Then
Writeln(x[i].fio);
END.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.01.2013, 16:39
Привет! Вот еще темы с решениями:

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

Комбинированный тип данных...
Известна зарплата каждого из 5 работников фирмы за каждый месяц первого ...

Комбинированный тип данных
Помогите пожалуйста с задачкой, очень вас прошу Составить программу...

Комбинированный тип данных (запись)
Описать массив записей, который содержит информацию о нескольких деталях...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru