Итог работы
Группа физико-математического профиля
program menu;
var a:integer;
begin
readln(a);
if (a<=10000) and (a>=5000) then writeln (‘чай — 50 руб.,компот -100 руб.,глазунья — 250руб, блины со сгущенкой — 350руб.,блины со сметаной — 300руб., гречка — 500руб., гречка с молоком — 1000руб., хлеб — 40руб./шт.’);
if (a<=20000) and (a>10000)then writeln (‘пюре — 500., котлета мясная — 1000руб., котлета рыбная — 800руб., кисель — 400руб., рожки — 400руб., рис с подливом — 600руб.’);
if (a<=30000) and (a>20000)then writeln (‘суши — 3000руб., салат «Цезарь» — 5000., салат «Гермиона» — 4000руб., салат «Оливье» — 1500руб., свежемолотый кофе — 600руб., вино «Жабмуль» — 10000руб.’);
if (a<=40000) and (a>30000)then writeln (‘гусь с яблоками в водке — 10000руб., котлеты из черной икры — 5000руб/шт., вино «Сильвупле» — 20000руб., жульен — 2000руб., свиные ушки в чесночном соусе — 4500руб., роллы — 3000руб.’);
if a<5000 then writeln (‘наш ресторан вам не подходит’);
end.
Группа социально-гуманитарного профиля