fouettearoma
?>

напишите подпрограмму, которая заполняет массив из n элементов в обратном порядке последовательными целыми числами, начиная с последнего элемента, который должен быть равен x. размер массива заранее задан константой n. используйте заголовок: procedure zap(x: integer; var m: tmas); тип тmas задан как array[1..n] of integer и может использоваться для описания параметров подпрограмм. только паскаль

Информатика

Ответы

ietishkin

#include <iostream>

#include <ctime>

using namespace std;

int main()

{

   const int vags = 18, places = 36;

   bool train[vags][places]{};

   // Если массив будет заполнятся случайными числами:

   // srand(time(0));

   // for(int i = 0; i < vags; i++)

   //    {

   //     for(int j = 0; j < places; j++)

   //         cout << (train[i][j] = rand()%2) << ' ';

   //    cout << endl;

   //    }

   // --- КОНЕЦ ОБЪЯВЛЕНИЯ СЛУЧАЙНЫМИ ЧИСЛАМИ ---

   

   // Если же будет задаваться пользователем:

   // for(int i = 0; i < vags; i++)

   //     for(int j = 0; j < places; j++) cin >> train[i][j];

   // --- КОНЕЦ ОБЪЯВЛЕНИЯ ПОЛЬЗОВАТЕЛЕМ ---

   

   int count = 0;

   for(int i = 0; i < vags; i++)

       for(int j = 0; j < places; j++)

           if(train[i][j]) count++;

   cout << "Empty: " << count << " places!\n";

   return 0;

}

P. S. Раскомментируйте нужный вам вариант (не указано каким образом будет задаваться массив).

hristos1212

Программа:
Python:

№1) без использования библиотек.

factorial = 1

for i in range(1, int(input()) + 1):

   factorial *= i

print(factorial)

№2) с использованием библиотеки math.

from math import factorial

print(factorial(int(input(

Объяснение:

В коде №1 сначала регистрируем переменную factorial, в которой будет храниться значение факториала. Далее - с цикла переменная i пробегается от 1 до введённого с клавиатуры числа (включительно). Значение переменной factorial умножается на i. В конце - вывод факториала.

В коде №2 используется метод factorial() библиотеки math. Выводится факториал введённого с клавиатуры числа.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

напишите подпрограмму, которая заполняет массив из n элементов в обратном порядке последовательными целыми числами, начиная с последнего элемента, который должен быть равен x. размер массива заранее задан константой n. используйте заголовок: procedure zap(x: integer; var m: tmas); тип тmas задан как array[1..n] of integer и может использоваться для описания параметров подпрограмм. только паскаль
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Воронина
Sakmarov
zuzazuza61
Chitaia
ирина Альбертовна
dashakhmeleva6
fmba18
sv-opt0076
natalia-shelkovich
Катерина Телюкин925
Vyacheslavovich1431
PetrovDrozdov1785
Стадник620
zotovinbox468
ryazantseva