Представьте эту информацию в виде соответствующей структуры: "Фирма Рога и Копыта продает компьютерную технику: принтеры (фирм HP, Epson, Canon, Brother), сканеры (фирм Epson, Canon и Mustek) и мониторы (фирм Sony, Samsung, Philips, Acer)".
var a: array [1..7] of System.Tuple<Boolean, String>; i: byte;
begin a[1] := new System.Tuple<boolean,string>(true, 'Понедельник'); a[2] := new System.Tuple<boolean,string>(true, 'Вторник'); a[3] := new System.Tuple<boolean,string>(true, 'Среда'); a[4] := new System.Tuple<boolean,string>(true, 'Четверг'); a[5] := new System.Tuple<boolean,string>(true, 'Пятница'); a[6] := new System.Tuple<boolean,string>(false, 'Суббота'); a[7] := new System.Tuple<boolean,string>(false, 'Воскресение'); readln(i); writeln((i in [1..7] ? String.Format('Day #{0} is {1}. It is {2}.', i, a[i].Item2, (a[i].Item1 ? 'working day' : 'weekend')) : 'There aren`t this day.')); end.
аоараооалаллалалп
а кто понял, тот понял
ауф АОоаоладвлвооООатал вьвлвлаллакьаьлЛЛлалала