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. в столбик
var
ar: array of integer;
n, k2, k3, k4, k5, i: integer;
r: real;
begin
write('Сколько учеников?');
readln(n);
setlength(ar, n);
writeln('Введите оценки:');
for i := 0 to n - 1 do
begin
readln(ar[i]);
case ar[i] of
2: inc(k2);
3: inc(k3);
4: inc(k4);
5: inc(k5);
else
writeln('Не оценка');
exit;
end;
end;
writeln('2:', k2);
writeln('3:', k3);
writeln('4:', k4);
writeln('5:', k5);
write('Успеваемость=', (k3 + k4 + k5) / n * 100:0:1);
end.
Пример ввода:
Сколько учеников?6
Введите оценки:
2
2
3
4
5
5
Пример вывода:
2:2
3:1
4:1
5:2
Успеваемость=66.7