Определить количество положительных элементов вектора x ={ x 1 , x 2 , …, x 20 }. Образовать новый вектор y из положительных элементов вектора x. Написал код

8
Укажите тип переменной для выражения: ((х>=-2) и (x<=2))
Если х, то
A. целый
B. вещественный
Если все выражение то
D. логический

9
Для выражения y=(3a+b)/2 исходными данными будут...
A. a,b

10
Для выражения y=(a+4b) при а=6, b=8 результат будет равен...
D. 38

11
Неправильным является имя величины...
C. 12авс

12
Сумма двух слагаемых а и b, деленная на сумму двух других
слагаемых c и d запишется как...
C. (a+b)/(c+d)

13
Имеется серия команд
f:=2;
f:=f*f;
f:=f*f;
f:=f*f.
Чему равен результат?
B. 256

14
Линейным называется алгоритм, в котором...
A. команды выполняются одна за другой в порядке их следования

15
Строка:
readln (A);
выполняет...
A. ввод в программу значения переменной А

16
Y:=5;
какой оператор выведет надпись Y=5?
A. writeln ( ' Y = ' , Y ) ;

17
а:=2; b:=8;
S:=а+b;
После выполненных последовательно данных трех команд переменная S принимает значение
равное ...
A. 10

18
S:=7;
S:=23;
writeln (S);
Какое значение будет выведено на экран?
A. 23

19
S:=1;
S:=S+5:
Writeln (S/2);
Что будет выведено на экране?
A. 3

20
A:=2; B:=5: B:=B-A; S:=A+B;
writeln (S);
Что будет выведено на экран?
A. 5

21
Для ввода данных в блок-схемах используют фигуру...
A. параллелограмм

22
Для выполнения вычислительных действий в блок-схемах используют фигуру...
C. прямоугольник

23
Определите результат работы фрагмента программы:
writeln ( ' 5+5= ' , 5+5 );
A. 5+5=10

24
Действие оператора WRITELN - это...
A. переход на новую строку

25
Сколько переменных нужно ввести для вычисления площади и периметра квадрата?
A. одну

26
Найдите логически неверно записанную последовательность команд.
те что имеют непонятные логические ходы
A. writeln (S); A:=A*2; readln (A,B); S:=A+B;
C. A:=A*2; readln (A,B); S:=A+B; Writeln (S);
D. readln (A,B); S:=A+B; A:=A*2; writeln (S);
27
Как будут выведены значения:
Writeln (A); Writeln (B); ?
A. в столбик

CONST k=10; {k - количество чисел в массиве}VAR a:array[1..k] of integer;    i,summ,n:integer; {i - счетчик цикла, summ - сумматор, n - количество элементов массива с четным значением}    sr:real; {sr - среднее арифметическое} BEGIN  summ:=0; n:=0; {Обнуляем счетчики}  for i:=1 to k do     begin      a[i]:=random(50); {Заполняем массив случайными числами}      write (a[i],' '); {Выводим массив}      if a[i] mod 2=0 then         begin          summ:=summ+a[i]; {Находим сумму элементов массива с четными значениями}          n:=n+1        end    end;  sr:=summ/n; {Находим среднее арифметическое}  writeln;  writeln (sr:0:2) {Выводим среднее арифметическое}END.