Var i,s:integer;
begins:=-1;
writeln(s);
for i:=2 to 10 do
begin
s:=s-3;
Writeln(s);
end;
<span>end.</span>
Школьный обед - меню (список блюд с ценой), сколько человек подписаны на
бесплатный/комплексный обед, какой объем блюд нужно приготовить к
обеду, время обеда и тд
Ремонт квартиры - какие изменение
необходимо сделать, бюджет, кто будет делать, материалы и их
приобретение, инструменты, рассчетное время ремонта и тд
Пассажир поезда - имя, место, билет, постель, чай, спутники, багаж, от куда и куда, поезд и вагон
Дом, в котором ты живешь - адрес, этажность, материал стен, коммуникации, год сдачи, кол-во подьездов и тп