
Вопрос задан 06.05.2019 в 10:07.
Предмет Информатика.
Спрашивает Морозова Алина.
Складіть програму, яка виводить на екран рекламу гамбургерів і пропонує користувачеві зробити
замовлення. Програма приймає замовлення й повідомляє користувача про те, який безкоштовний сюрприз він отримає. До одного замовленого гамбургера додається пляшка мінеральної води; до двох — пляшка кока-коли; до трьох або більше — ще один гамбургер.

Ответы на вопрос

Отвечает Рубчинский Дима.
//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
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



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Щоб скласти програму, яка виводить на екран рекламу гамбургерів і пропонує користувачеві зробити замовлення, а також повідомляє користувача про безкоштовний сюрприз, який він отримає, потрібно використати мову програмування. Оскільки ви не вказали конкретну мову програмування, я використаю псевдокод для пояснення логіки програми.
Логіка програми:
1. Вивести на екран рекламу гамбургерів. 2. Запитати користувача, чи він бажає зробити замовлення. 3. Якщо користувач погоджується зробити замовлення, запитати кількість гамбургерів, яку він бажає замовити. 4. Залежно від кількості замовлених гамбургерів, визначити, який безкоштовний сюрприз користувач отримає: - Якщо замовлено 1 гамбургер, додати пляшку мінеральної води. - Якщо замовлено 2 гамбургери, додати пляшку кока-коли. - Якщо замовлено 3 або біль

Топ вопросов за вчера в категории Информатика

Информатика 579

Информатика 1642

Информатика 22

Информатика 32

Информатика 15

Информатика 10

Информатика 139
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili