Заполните пропуски в программе ввода и вывода 10 целочисленных элементов массива, заданных случайным образом на промежутке [20; 40]: program gh; var a: array[ of integer; i: integer; begin for i: =1 to __ do begin a[i] : = + ; ; end; end.

program gh;

    var a: array[ 1..10] of integer;

                i: integer;

begin

  for i: =1 to 10 do

        begin

              a[i] : = random(20) + 20;

              write(a[i]);

        end;

end.

Выведет ⦁2 2 3 2  сначала переменная а=1 и b =2 вызов процедуры  p(a,b) к а добавит 1 и а станет = 2, перед  b в заголовке процедуры не стоит var, поэтому данная переменная является  параметром-значением и передается по значению, т.е. значение у b всегда остается 2.   после  writeln(a,’ ‘,b);   на экране выведется 2   2повторный  вызов процедуры  p(a,b) к а добавит 1 и а станет = 3, а значение b при выводе вне процедуры по-прежнему останется 2получим : 3   2

Блок-схема - в прилагаемом файле. программа: #include < iostream> #include < stdlib.h> using namespace std; int main() { const int n = 20; int a[n]; int k1=0; int k2=0; int k3=0; srand(time(0)); for (int i = 0; i < n; i++) { a[i]=rand() % 3 +1; cout < < a[i] < < " "; } cout < < "\n"; for (int i = 0; i < n; i++){   switch(a[i]){ case 1:   k1++; break; case 2:   k2++; break; case 3:   k3++; break;   } }     cout < < "k1 = " < < k1 < < "   k2 =   " < < k2 < < "   k3 =   " < < k3 < < "\n";   return 0; } пример: 2 1 2 1 2 1 3 3 2 3 1 3 1 2 3 2 1 3 3 3 k1 = 6 k2 = 6 k3 = 8