// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018
// Внимание! Если программа не работает, обновите версию!
type
TRAIN = record
ПунктНазначения: string;
НомерПоезда: string;
ВремяОтправления: DateTime
end;
procedure ВводДанных(Список: List<TRAIN>);
begin
var Поезд: TRAIN;
var ЧЧММ: string;
for var i := 1 to 6 do // 6 поездов
begin
Println('Ввод данных о поезде', i);
Поезд.ПунктНазначения := ReadlnString('Пункт назначения:');
Поезд.НомерПоезда := ReadlnString('Номер поезда:');
repeat
ЧЧММ := ReadlnString('Время отправления (ЧЧ:ММ):');
until DateTime.TryParse(ЧЧММ, Поезд.ВремяОтправления);
Список.Add(Поезд)
end
end;
procedure ПоискПоездов(Список: List<TRAIN>; ПунктНазначения: string);
begin
var Отобрано:=
Список.Where(Поезд->Поезд.ПунктНазначения=ПунктНазначения);
if Отобрано.Count>0 then
foreach var Поезд in Отобрано do
Writeln($'{Поезд.НомерПоезда} {Поезд.ВремяОтправления:HH-mm}')
else
Println('Нет поездов на это направление')
end;
begin
var Поезда := new List<TRAIN>;
ВводДанных(Поезда);
ПоискПоездов(Поезда,ReadlnString('Куда едем?'))
end.
ответ:
для чего используются таблицы
итак, попытаемся ответить на следующий вопрос: что лучше — организовать информацию в таблицу или просто выровнять данные с клавиши ? что, вы никогда об этом не задумывались? думаем, такой вопрос — вообще не тема для дискуссии, поскольку тут, как говорится, двух мнений быть не может. судите сами.
клавиша удобна при работе с небольшими фрагментами текста. если же требуется организовать большие фрагменты данных, знакомства с таблицей вам не избежать.
таблица применяется в случае, если вам необходимо систематизировать в строки и столбцы довольно большой объем данных.
"клетка" таблицы называется ячейкой. в ячейку можно поместить текст (много текста) и графику.
текст в ячейках таблицы может иметь собственные поля и может быть отформатирован в виде абзацев. в ячейку вы вправе также поместить графику.
в отличие от текста, выровненного с клавиши , размеры таблицы вы имеете возможность изменять как угодно. поэтому, если вы собираетесь в будущем видоизменять способ представления данных, лучше поместить их в таблицу, нежели мучиться с примитивным текстом, отформатированным клавишей ,
к сожалению, word не сможет преобразовать ваш стол в стойку бара. (но поговаривают, что уже видели проспекты, в которых фирма microsoft анонсировала включение в word панели слесарного инструмента.)