#include<iostream>
#include<cstdlib>
#include<locale>
#include<ctime>
using namespace std;
int main()
{
<span> setlocale(LC_ALL, "Russian");</span>
<span> srand(time(NULL));</span>
<span> int min_value, max_value;</span><span>
int mas[10];</span>
// инициализируем массив случайными числами
<span> for(int i=0; i<10; i++) mas[i] = rand()%100;</span>
<span>
//находим минимальное значение</span><span>
min_value = mas[0];</span><span>
for(int i=0; i<10; i++)</span><span>
if(min_value > mas[i]) min_value = mas[i];</span>
<span>
cout << "Минимально значение: " << min_value << '\n';</span>
<span>
//находим максимальное значение</span><span>
max_value = mas[0];</span><span>
for(int i=0; i<10; i++)</span><span>
if(max_value < mas[i]) max_value = mas[i];</span>
<span> cout << "Максимальное значение: " << max_value << '\n';</span>
<span>
//выводим среднее значение максимального и минимального значение</span><span>
cout << "Среднее значение: " << (double) (min_value+max_value)/2 << '\n';
</span><span>}</span>
//PascalABC
7)а) if (x > y) then z := x + y
else z := y - x;
б)при x = 5 и y = -6 (x > y)
z = x + y = -1
8) if (num1 < num2) then num1 := num1 + num2
else num1 := num1 - num2;
<em>// PascalABC.NET 3.3, сборка 1555 от 21.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString.Reverse.Println
end.
<u>Пример</u>
рука
акур
1 , 2 , 3 , 4 , 5 , 6 , 7 , 8 , 9 , 10 ,
512*240=122880
переводим килобайты в мегабайты
120 МБ)
