Сделайте из 2 массивов 1 Program Example2;
var Rand: array[1..20] of integer;
I, X, NumberX:integer;
begin
Randomize;
writeln(' Masiv slychainix chisel: ');
for I:=1 to 20 do
begin
Rand[I]:=random(50);
write(Rand[I]:4)
end;
writeln;
write(' Vvedite X: ');
readln(X);
NumberX:=0;
for I:=1 to 20 do
if Rand[I] = X then NumberX:=NumberX + 1;
if NumberX = 0 then writeln('V masice net chisla ',X)
else writeln(' Chislo ', X, ' v masive prisytsvyet ', NumberX, ' paz ');
end.
​

c++

Объяснение:

#include <iostream>

using namespace std;

int main()

{

   int n;

   cout << "Введите размер массива: ";

   cin >> n;

   double *arr = new double[n];

   /*Ввод массива*/

   cout << "Введите массив: ";

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

       cin >> arr[i];

   }

   /*Вывод результата*/

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

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

       if(arr[i] < 0) {

           arr[i] = -1;

       }

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

   }

   return 0;

}

ответ: В зависимости от того, что выберет пользователь, вычислить площадь либо прямоугольника, либо треугольника, либо круга. Если выбраны прямоугольник или треугольник, то надо запросить длины сторон, если круг, то его радиус.

Площадь треугольника вычисляется по формуле Герона:

Объяснение: где p - это полупериметр, a, b, c - длины сторон. Полупериметр равен половине периметра, то есть половине суммы сторон.

Площадь прямоугольника равна произведению его сторон. Площадь круга вычисляется по формуле S = πr2.