Складіть програму, яка виводить на екран рекламу гамбургерів і пропонує користувачеві
зробити замовлення. Програма приймає замовлення й повідомляє користувача про те, який
безкоштовний сюрприз він отримає. До одного замовленого гамбургера додається пляшка
мінеральної води; до двох — пляшка кока-коли; до трьох або більше — ще один гамбургер.
//Pascal ABC.NET v3.0 сборка 1111
Var
a:integer;
begin
writeln(Our burgers do not prepare you for the exam, but will learn to code);
writeln(Value of burgers:);
readln(a);
case a of
1:writeln(Mineral water);
2:writeln(Coca-cola bottle);
end;
if a>=3 then writeln(One more burger);
end.
Пример ввода:
10
Пример вывода:
One more burger
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
