Цитата:
Сообщение от Vladimir_S
Да уж больно задача не то, чтобы сложная, а просто муторная какая-то. Изобретать кучу поездов, времен отправления, направлений, классов мест и т.д и т.п. и проч... А в принципе - ничего сложного. Давайте уж сами. Или, по крайней мере, разработайте все условия. Но лучше, повторяю, поработайте самостоятельно. Ничего сложного. А мы подскажем, поправим, если что.
|
Да в том то и проблема, что не получается да и не приходит в голову как ее составить грамотно(
Начал вроде, но почему-то сомнения терзают...
Код:
uses crt;
type
data=record
time:0..23;
day:char;
month:1..12;
Year:2000..2100;
end;
pyt=record
napravlenie:char;
end;
poezd=record
kupe:array [1..55] of byte;
plac:array [1..20] of byte;
end;
var
a:data;
b:pyt;
c:poezd;
i,j:byte;
Что-то подсказывает что описал запись я неправильно