Заполните таблицу номер

1. 10
2. 12
3. 3
4. 22
5. 15
6. 34
7. 3
Часть 2
1. 
Var
  n:integer;
Begin
  Write('Введи число ');
  Readln(n);
  if (n mod 2) = 0 then write(n,' чётное) else write(n,' нечётное);
End.
2.
Var
  a,b:integer;
Begin
  Write('Введи числа ');
  Readln(a,b);
  if a>b then Begin Write('a = ',b*a,' b = ',a+b) else write('a = ',a+b,' b = ',a*b);
End.
3.
Var
  n:integer;
Begin
  write('Введи двузначное число ');
  Readln(n);
  if ((n div 10) = 6) or ((n mod 10) = 6) then write('6 присутствует') else write('6 нет в этом числе');
End.

Объяснение:

1)

#include <iostream>

using namespace std;

int main()

{

setlocale(LC_ALL, "RUSSIAN");    

int a, b, c, w, h;

cout << "Введите ширину дверного проема, см: "; cin >> w;

cout << "Введите высоту дверного проема, см: "; cin >> h;

cout << endl;

cout << "Введите высоту шкафа, см: "; cin >> a;

cout << "Введите ширину шкафа, см: "; cin >> b;

cout << "Введите глубину шкафа, см: "; cin >> c;

cout << endl<< "Результат: ";

if (b < w && a < h || c < w && a < h || c < w && b < h) cout << "Шкаф пройдет в дверной проем." << endl;

else cout << "Шкаф не пройдет в дверной проем." << endl;

system("pause");

return 0;

}