C++
<span>#include <iostream>
#include <algorithm>
#include <iterator>
#include <random>
#include <vector>
std::mt19937 gen {std::random_device()()};
std::uniform_int_distribution<int> uid(1, 10);
int main()
{
int N = 0;
std::cin >> N;
std::vector<unsigned> arr(N);
for (auto &i : arr) i = uid(gen);
std::reverse(std::begin(arr), std::end(arr));
std::copy(std::begin(arr), std::end(arr),
std::ostream_iterator<int>(std::cout, " "));
system("pause");
<span>}</span></span>
Говорить про вес луны не сосвсем корректно, так как это непосредственно от планеты, на которой она лежит. Масса её равна 7,3477×10^22 кг.
<span>Расстояние между Землей и Луной равно <span>384400 км.</span></span>
За теоремою Піфагора:
АB^2=AC^2+BC^2
AB^2=48+16
AB^2=64
AB=32
P=32+4+24=60
Uses crt;
var a:array [1..100] of integer;
k,n,i:integer;
begin
clrscr;
write('Введите количество элементов массива=');
readln(n);
randomize;
for i:=1 to n do
a[i]:=random(45)-20;
writeln('Исходный массив');
for i:=1 to n do
write(a[i]:6);
writeln;
for i:=1 to n-1 do
if a[i+1]>a[i] then
writeln('Индексы: ',i:3);
writeln;
readln;
end.