М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
jusupova2001
jusupova2001
08.04.2023 23:26 •  Информатика

Стоимость билета в театр зависит от выбора ряда: 1-3 ряды: 600 рублей, 4-7 ряды: 700 рублей, 8-14 ряды: 500 рублей. пользователь вводит номер ряда, на котором бы он предпочел сидеть, и необходимое количество билетов. программа должна вывести стоимость заказа покупателя. например, ряд 4, билетов 2. ответ: 1400 рублей.

👇
Ответ:
Joyli67
Joyli67
08.04.2023
Var 
a: integer;
b: integer;
c: integer;
begin 
writeln('Введите номер ряда');
 readln(a); 
writeln('Введите число билетов'); 
readln(b);
 if a<=3 then c := b * 600; 
if (a>=4) and (a<=7) then c := b * 700;
if (a>=8) and (a<=14) then c := b * 500; 
writeln('Ваш счет за ' ,a, ' ряд равен ' , c);
 end.
Ну вот так вроде)
У меня работает)
4,4(60 оценок)
Ответ:
Kanat2K4
Kanat2K4
08.04.2023
мне лень на паскале + он туповат, вот код на С++ (современный язык на ряду с Java)

#include <bits/stdc++.h>
#include <conio.h>
typedef long long   lol;
typedef unsigned long long ull;
typedef int         it;
typedef bool        bl;
typedef long double ld;
typedef char        cr;
#define mp          make_pair
#define INF         INT_MAX
#define LINF        LONG_LONG_MAX
#define fr(i,n)     for(i=0;i<(n);i++)
#define frr(i,n)    for(i=0;i<=(n);i++)
#define wl(i,n)     while(i<n)
#define prllprll    pair < pair<long long,long long>,pair<long long,long long> >
#define prll        pair<long long,long long>
#define pri         pair<int, int>
#define F           first
#define S           second
#define sqr(a)      ((a)*(a))
#define pb          push_back
#define vll         vector<long long>
#define vit         vector<int>
#define sg          string
#define qit         queue<int>
#define qll         queue<long long>
#define pqll        priority_queue<long long>
#define pqit        priority_queue<int>
#define y           dsadaf
#define y1          lfkfgi
using namespace std;
lol a,b;
int main()
{
    cin >> a >> b;
    if (a>=1 && a<=3)
        cout << 600*b;
    else
    if (a>=4 && a<=7)
        cout << 700*b;
    else
    if (a>=8 && a<=14)
        cout << 500*b;
    else    return 0;
}
4,6(19 оценок)
Открыть все ответы
Ответ:
alenxolod3364
alenxolod3364
08.04.2023

#include <iostream> // подключаем библиотеки

#include <cstdlib>

using namespace std; // глобальное пространство имён

int main()

{

setlocale(LC_ALL,"russian"); // русский язык

int tenge;

int number = 0;

cout << "Введите сумму Вашего вклада: ";

cin >> tenge;

if(tenge==200000) // если вклад 200000

{

cout << "Ваш доход составит 13,5% в год. ";

number = number+1;

}

if(tenge==350000) // если вклад 350000

{

cout << "Ваш доход составит 14,2% в год. ";

number = number+1;

}

if(number==0) // если какая-то иная сумма

{

cout << "Требуется уточнить у менеджера процентную ставку для Вашей суммы вклада. Ожидайте.";

}

   system("pause");

   return 0; // код ошибки "0"

}

4,5(86 оценок)
Ответ:
Russ1357900
Russ1357900
08.04.2023
Var a,b:longint;
function sum (n:integer):integer;
  var s:integer;
  begin
     s:=0;
     while (n<>0) do
       begin
         s:=s+n mod 10;
         n:=n div 10;
       end;
     sum:=s; 
  end;
  begin
    write ('A = ');
    readln (a);
    write ('B = ');
    readln (b);
    if sum(a) > sum(b) then
       writeln ('Сумма цифр 1ого числа больше на ',sum(a)-sum(b))
    else if sum(b) > sum (a) then 
       writeln ('Cумма цифр 2ого числа больше на ',sum(b)-sum(a))
    else writeln ('Сумма цифр 1ого числа равна сумме цифр 2ого числа');
    readln;
  end.
4,5(21 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ