напишите программу(Pascal), которая вычисляет произведение первых n членов ряда 1, ½, 1/3, ¼
Количество членов ряда задается во время работы программы (используя цикл с параметром).

1)110010112+101112= x2 2)111012*11102= x2 №6 (110002+6A716)*518=x10 1) MMMCCCXXIX=300010+30010+2010+910= =332910 2) 235410=200010+30010+5010+410= =MMCCCVIV 1) 1101010012=42510 Проверка: 2) 79810= 11000111102 Проверка: 78910=14258 201110=7DB16 1)110010112+101112=111000102 2)111012*11102=1100101102 (110002+6A716)*518=(2410+170310)*4110=7080710 Вариант 2 Вариант 3 №1 1)MMMCDLXIX → x10 2)187810 р.с.с. → №2 1) MMDCCLXXV → x10 2) 135710 р.с.с. → №1 №2 (+проверка) (+проверка) 1)11011112 → x2 2)103810 → x10 1) 110110112 → x2 2)619 10 → x10 43210 → x8 №3 (+проверка) №4 (+проверка) 145610 → x16 №5 1)11001112+1101112= x2 2)11101112*11112= x2 №6 (110012+6216)*1018= x10 Вариант 4 59810 → x8 №3 (+проверка) №4 (+проверка) 126810 → x16 №5 1)1110010112+101012= x2 2)11001012*11012= x2 №6 (101112+25A16)*168= x10 Вариант 5 1)MMMDCCXLIX 2)1874 10 р.с.с. → №1 → x10 №2 1) MMCXCVII 2) 154310 р.с.с. → → x10 №1 №2 (+проверка) (+проверка) 1)110110110 2 2) 53210 → x2 → x10 67810 → x8 №3 (+проверка) №4 (+проверка) 134410 → x16 №5 1)11011102+110012= x2 2)110012*111012= x2 №6 1)11110001 2 → x2 2)650 10 → x10 №3 (+проверка) №4 (+проверка) 110110 → x8 56810 → x16 1)111000112+11102= x2 2)1110112*11112= x2 №5 №6 (1010112+AE216)*738= x10 (101112+FC16)*1528= x10 Вариант 6 1)MCMLXXXIII №1 → x10 Вариант 7 1)MMCDLXIX → x10 №1 2)187610 р.с.с. → 2) 190310 р.с.с. → №2 (+проверка) 1)1110111 2 → x2 2)712 10 → x10 №3 101010 → x8 (+проверка) №4 (+проверка) 100010 → x16 №5 1)111100112+11112= x2 2)11110112*10112= x2 №6 (101012+AC16)*10118= x10 Вариант 8 №1 → x10 1)MMCMXLVI 2) 177110 р.с.с. → №2 (+проверка) 1) 11101012 → x2 2) 33310 → x10 №3 66710 → x8 (+проверка) №4 (+проверка) 129810 → x16 №5 1)110011112+11112= x2 2)111012*110012= x2 (110012+EE16)*1248= x10 №6 Вариант 10 №1 1) MMMCDXLIV → x10 2)122210 р.с.с. → №2 (+проверка) 1)11000102 → x2 2) 33310 → x10 1)1101011 2 → x2 2) 60110 → x10 72810 → x8 190010 → x16 №2 (+проверка) №3 (+проверка) №4 (+проверка) №5 1)1111112+1010102= x2 2)1011112*1112= x2 №6 (111112+AE16)*2008= x10 Вариант 9 1) MMCCCLXXVIII 2) 220010 р.с.с. → №1 → x10 №2 (+проверка) 1) 111000112 → x2 2) 23110 → x10 №3 55510 → x8 150110 → x16 (+проверка) №4 (+проверка) №5 1)11000112+101112= x2 2)110012*1112= x2 №6 (111112+FA16)*10018= x10 Вариант 11 №1 1) MMDCCLXXXV → x10 2) 192810 р.с.с. → №2 (+проверка) 1) 111100102 → x2 2) 20210 → x10 99010 → x8 №3 (+проверка) №4 (+проверка) 150210 → x16 №5 1)11001112+11102= x2 2)101012*101012= x2 №6 (11012+CD16)*1118= x10 Вариант 12 №1 1) MMMCDXLV x→ 10 2) 311110→р.с.с. №2 (+проверка) 1)1100111 2 → x2 2) 18910 → x10 №3 50210 → x8 (+проверка) №4 (+проверка) 102510 → x16 №5 1)110011012+1112= x2 2)10111012*1012= x2 60610 → x8 190010 → x16 №3 (+проверка) №4 (+проверка) №5 1)110011112+1002= x2 2)1101112*11112= x2 (10102+AD16)*1108=x10 №6 Вариант 13 №1 1)MMCDXLIX 2)3053 10 р.с.с. → → x10 №2 (+проверка) 1)1100001 2 → x2 2) 19810 → x10 77710 → x8 №3 (+проверка) №4 (+проверка) 215610 → x16 1)11100012+1012= x2

1)

#include <iostream>

using namespace std;

int main ()

{

   int k = 0;

   int n, m, a[100][100];

   cin >> n >> m;

   for (int i = 0; i < n; i++){

       for (int j = 0; j < m; j++){

           cin >> a[i][j];      

       }

   }

   for (int i = 0; i < n; i++){

       for (int j = 0; j < m; j++){

        if(a[i][j]==a[j][i]){

        k++;

        }

       }

   }

   cout<<"Количество элементов a[i][j] = a[j][i], " << k << endl;

}

2)

#include <iostream>

using namespace std;

int main ()

{

   int a[100], n, m,s = 0;

   cout << "Введите количество элементов массива" << endl;

   cin >> n;

   cout << "Введите заданное число" << endl;

   cin >> m;

   for(int i = 0; i<n;i++){

       cout << "Введите " << i+1 << " элемент массива" << endl;

       cin >> a[i];

   }

   for(int i = 0; i<n;i++){

       if(a[i] > m){

           s+=a[i];

       }

   }

   cout << "Сумма элементов, больших заданного числа "<< s << endl;

}