Язык программирования Паскаль
2 вариант
1. Использование writeln устанавливает курсор в…
1) … конец строки
2) … начало следующей строки
3) … конец выведенного текста
4) … начало текущей строки
2. Каждое предложение программы заканчивается…
1) … новой строкой
2) … точкой с запятой
3) … оператором stop
4) … запятой
3. Написать фрагмент программы, выводящий следующее:
1 2 3 4 5 6 7 8 9 10
1) for loop := 1 to 10 do write( loop, ' ' );
2) for loop := 1 to 10 do write( 'loop ' );
3) for loop := 1 to 9 do write( loop, ' ' );
4) for loop = 1 to 10 do write( loop, ' ' );
4. Какое ключевое слово не относится к циклической программе?
1) If
2) While
3) For
4) Until
5. Какой оператор цикла с предпроверкой условия?
1) Repeat
2) While
3) For
4) Until
6. Написать предложение, определяющее числовой массив из целых чисел в количестве 20.
1) type numbers = ARRAY[1..20] of int;
2) type numbers = ARRAY[1..20] of integer;
3) type numbers := ARRAY[1..20] of integer;
4) var numbers = ARRAY[0..19] of int;
7. Написать предложение, присваивающее число 20 четвертому элементу массива mynumbers.
1) mynumbers[3] = 20;
2) mynumbers[20] := 4;
3) mynumbers[4] = 20;
4) mynumbers[4] := 20;
8. Как обозначается массив?
1) Array
2) Dim
3) Procedure
4) Set
9. Процедуры и функции – это:
1) операторы
2) подпрограммы
3) имена
4) переменные
10. Оператор ввода в Паскале:
1) INPUT
2) PRINT
3) READ
4) WRITE
11. Когда используется выражение, которое начинается со слова IF, то обязательно применяется слово:
1) GOTO
2) THEN
3) THAN
4) ELSE
12. Функция арктангенса в Паскале обозначается:
1) ATG(X)
2) ATAN(X)
3) ARCTAN(X)
4) ATN(X)
13. Какое по типу выражение вычисляется в условии оператора if?
1) числовое выражение
2) неравенство
3) равенство
4) логическое выражение
14. Что вычисляет функция SQR в Паскале?
1) остаток от деления
2) квадратный корень
3) квадрат числа
4) модуль числа
15. Разветвляющийся алгоритм – это:
1) многократное исполнение одних и тех же действий
2) присутствие в алгоритме хотя бы одного условия
3) набор команд, которые выполняются друг за другом
4) вс алгоритм для дополнительных функций
16. В представленном фрагменте программы тело цикла выполнится …
d:=46
b:=11 WHILE d >= b DO d:= d - b
1) 4 раза
2) 3 раза
3) 2 раза
4) 1 раз
program n_1;
type
m= array [1..5] of integer;
var
a,a1,a2,a3,a4,a5,a6,a7,a8,a9: integer;
b,b1,b2,b3,b4,b5,b6,b7,b8,b9: m;
c,c1,c2,c3,c4,c5,c6,c7,c8,c9: m;
d,d,d2,d3,d4,d5,d6,d7,d8,d8: m;
begin
randomize;
b,b1,b2,b3,b4,b5,b6,b7,b8,b9:= random;
c,c1,c2,c3,c4,c5,c6,c7,c8,c9:= random;
d,d,,d2,d3,d4,d5,d6,d7,d8,d8:= random;
a:= (b+c+d) div 3;
a1:= (b1+c1+d1) div 3;
a2:= (b2+c2+d2) div 3;
a3:= (b3+c3+d3) div 3;
a4:= (b4+c4+d4) div 3;
a4:= (b5+c5+d5) div 3;
a6:= (b6+c6+d6) div 3;
a7:= (b7+7c+d7) div 3;
a8:= (b8+c8+d8) div 3;
a9:= (b9+c9+d9) div 3;
writeln ('Ученик-', a);
writeln ('Ученик 1-', a1);
writeln ('Ученик 2-', a2);
writeln ('Ученик 3-', a3);
writeln ('Ученик 4-', a4);
writeln ('Ученик 5-', a5);
writeln ('Ученик 6-', a6);
writeln ('Ученик 7-', a7);
writeln ('Ученик 8-', a8);
writeln ('Ученик 9-', a9)
end.