1)задан массив целых чисел случайным образом. заменить все числа большие 7 на число 7. вывести количество таких чисел. 2)дан массив целых чисел а из 20 элементов, значения которого формируются случайным образом. определить число нулевых элементов и записать ненулевые в массив в.

// pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   var a: =arrrandom(readinteger('n=',20); a.println;   var k: =0;   for var i: =0 to a.length-1 do       if a[i]> 7 then begin a[i]: =7; inc(k) end;   a.println;   writeln('количество замен равно ',k);   // если нужно общее количество семерок, замените   // предыдущую строку следующей:   // writeln('количество семерок равно ',a.where(x-> x=7).count); end. тестовое решение n= 15 10 -11 14 12 -9 17 -4 11 -20 14 5 5 -3 -1 -2 7 -11 7 7 -9 7 -4 7 -20 7 5 5 -3 -1 -2 количество замен равно 6 // pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   var a: =arrrandom(20,-5,8); a.println;   var b: =a.where(x-> x< > 0).toarray; b.println;   writeln('количество нулей равно ',20-b.count); end. тестовое решение -4 0 -5 -1 7 3 6 7 7 0 5 -2 -5 -2 7 0 3 1 7 3 -4 -5 -1 7 3 6 7 7 5 -2 -5 -2 7 3 1 7 3 количество нулей равно 3

г

Объяснение:

ответом является "г" так как "а,б,в" используются в языке программирования Паскаль