Первая в мире электронно-вычислительная машина (ЭВМ) была построена в США и называлась …….​

ENIAC

Объяснение:

1)

#include <iostream>

using namespace std;

int main() {

int n,m;

cout << "Enter number n: ";

cin >> n;

cout << "Enter number m: ";

cin >> m;

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

 if (i % 3 == 0) cout << i << endl;

}

}

2)

#include <iostream>

using namespace std;

int main() {

int n, m, sum=0;

cout << "Enter number n: ";

cin >> n;

cout << "Enter number m: ";

cin >> m;

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

 if (i % 2 == 0) sum+=i;

}

cout << "Result: " << sum;

}

3)

#include <iostream>

using namespace std;

int main() {

long n,m, max=0;

cout << "Enter number: ";

cin >> n;

m = n;

 for (int i = 10; n>0;) {

 if (n % i > max)  

  max = n % i;

 n = n / i;

}

 cout << "Result: " << max;

}

Объяснение:

1.

program MinElement;

var

X: array[1..30] of Integer;

i, min: integer;

begin

randomize;

for i := 1 to 30 do

X[i] := random(100);

min := X[1];

for i := 1 to 30 do

if X[i] < min then

min := X[i];

writeln('Минимальное число: ', min);

write('Все элементы:');

for i := 1 to 30 do

write(' ', X[i]);

readln;

end.

2.

program Summa;

var

X: array[1..20] of Integer;

i, sum: integer;

begin

randomize;

for i := 1 to 20 do

X[i] := random(100);

sum := 0;

for i := 1 to 20 do

sum := sum + X[i];  

writeln('Сумма всех чисел: ', sum);

write('Все элементы:');

for i := 1 to 20 do

write(' ', X[i]);

readln;

end.

Всё правильно и проверено лично!