E, В=100 r0, Ом=2 r1, Ом=2 r2, Ом=3 r3, Ом=3

#include <iostream>

#include <cstdlib>

#include <ctime>

typedef int datatype;

void init_array(datatype* arr, int SIZE)

{

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

       arr[i] = rand() % 100;

}

void show_array(datatype* arr, int SIZE)

{

   std::cout << "array: ";

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

       std::cout << arr[i] << " ";

   std::cout << "\n";

}

datatype find_sum(datatype* arr, int SIZE)

{

   datatype sum = 0;

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

       sum += arr[i];

   return sum;

}

int main()

{

   std::cout << "enter a size of the array: ";

   int SIZE;

   std::cin >> SIZE;

   datatype *arr = new datatype[SIZE];

   srand(time(NULL));

   init_array(arr, SIZE);

   show_array(arr, SIZE);

   std::cout << "sum of elements: " << find_sum(arr, SIZE) << "\n";

   delete[] arr;

   return 0;

}

1)

var

  a: 100..999;

  a1, a2, a3: 0..9;   //а1 - сотни, а2 - десятки, а3 - единицы

 

begin

  writeln('введите натуральное трехзначное число');

  readln(a);

  a1: = a div 100;

  a2: = (a mod 100) div 10;

  a3: = a mod 10;

  writeln('полученное число:   ', a1, a3, a2);

end.

2)

var

  a: 100..999;

  a1, a2, a3: 0..9;

 

begin

   

  writeln('введите натуральное трехзначное число');

  readln(a);

  a1: = a div 100;

  a2: = (a mod 100) div 10;

  a3: = a mod 10;

  writeln('полученное число:   ', a2, a1, a3);

end.

3)

var

  a: 100..999;

  a1, a2, a3: 0..9;

 

begin 

  writeln('введите натуральное трехзначное число');

  readln(a);

  a1: = a div 100;

  a2: = (a mod 100) div 10;

  a3: = a mod 10;

  writeln('полученное число:   ', a3, a1, a2, a3);

end.

4)

var

  a: 1000..9999;

  a1, a2, a3, a4: 0..9;

 

begin

  writeln('введите натуральное четырехзначное число');

  readln(a);

  a1: = a div 1000;   //тысячи

  a2: = (a mod 1000) div 100;   //сотни

  a3: = (a mod 100) div 10;   //десятки

  a4: = a mod 10;   //единицы

  writeln('полученное число:   ', a4, a3, a2, a1);

end.

все остальное делается наподобие этого: просто в writeln меняешь местами цифры и все.