КОНТРОЛЬНЫЙ ТЕСТ (Паскаль)

1 курс

1. Какой тип алгоритма необходимо применить, если последовательность команд выполняется последовательно в заданном порядке?

1) циклический

2) разветвляющийся

3) линейный

4) простой

2. Указать тип величины, если её значение равно: 36.6

1) строковый или текстовый (string)

2) целочисленный (integer)

3) символьный (char)

4) вещественный (real)

3. Выбрать допустимые значения для переменных целочисленного (Integer) типа:

'а';5; 0.5; 19; 3.64; 44; 'a+5'

1 )'а'; 5; 19; 44;

2) 0.5; 3.64

3) 'a'; 'a+5'

4) 5; 19; 44

5 ) нeт допустимых значений

4. Тип REAL (вещественный) используется для переменной, обозначающей:

1 )год поступления в колледж

2) вес шкафа

3) количество кафедр в институте

4 )восклицательный знак

5. Тип CHAR (символьный) используется для переменной, обозначающей:

1 )количество гостей на празднике

2) вес грузовика

3) букву латинского алфавита

4) породу собаки

6. Что будет выведено на экран после работы операторов:

А:=-1; В:=10; А:=А+В; Writeln(B,‘ A=’,A);

1 ) A=-1 10

2 ) 10 A=-1

3 ) 10 A=9

4) B=10 A=9

7. Выбрать верный результат целочисленного деления: 9 Div (17 Mod 7)

1 )1;

2 )3;

3 )0;

4 )4.

8. Выбрать правильную запись на языке Паскаль оператора ввода с клавиатуры значений трём вещественным переменным:

1)Read(x;y;z);

2) ReadLn(X, Y, Z);

3) Readln (X:4:1, Y:4:1, Z:4:1);

4) Writeln (‘Vvedi X, Y, Z’);

9. показывающего, что значения переменной X находятся на промежутке [0;5), на языке Паскаль имеет вид:

0<=Х<5

1) Х>=0 and X<5

2) (X>=0) and (X<5)

3) (X>=0) OR (X<5)

10 .Отметить правильно записанные условные операторы:

1 )if X >Y then write (X*X) ; else write (Y+Y);

2) if X +1>10 then begin Y:=X; write (X,Y); end;

3) if S=0 then read (x);

4 )if B<>0 then write (B) else B:= 1;

5) if a:=1 then write (a) else write ('Privet!');

11. Выбрать верный результат, если ввели S=2 (ответ в скобках):

1) If S=0 Then Write (s) else write (S+1); { 2 }

2) if S >=0 Then Write (s*s) else write (S); { 4 }

3) if S<>5 THEN write (S+1) else write (S); { 3 }

4) if S+1< 1 THEN write (SQR(S)) else write (S-1); { 1 }

12. Выбрать правильную запись условного оператора: Если значение переменной К больше или равно 5, то присвоить переменной М значение, равное К/2 и вывести его на экран

1) If K>=5 begin M:=K/2; write(K); end;

2) If K>=5 Then begin M:=K/2; Write(K); End;

3) If K>=5 then M:=K/2 and Writeln(K);

13. Количество повторов, заданных оператором цикла

For I:=0 to 15 Do Write (I); равно:

1) 15

2) 16

3 )14

14. Выбрать верный результат после выполнения фрагмента программы:

For K:=1 to 3 Do Write (K:5);

1) 6 7 8

2) 678

3) 1 2 3

4) 3

5) 8

15. Какое значение примет переменная С после выполнения оператора цикла:

С:=0; For I:=1 to 3 Do C:=C+I;

1) 136

2) 3

3) 6

4)4

1. 3

2. 4

3. 4

4. 2

5. 3

6. 3

7. 2

8. 2

9. 2

10. 2, 3, 4

11. 2, 3, 4

12. 2

13. 1

14. 3

15. 3