Итоговый тест по языку Паскаль

ВАРИАНТ 1.

Часть А.

1. Переменная х принимает значения:
   1) 2.6                           3)   !
   2) ‘текст’                    4) 100
   Укажите, какой тип требуется использовать  для описания переменной х:
   а)  char;          б) real;                    в) integer;                 г) string.
      
2. Укажите вариант правильной записи формулы:
   а) (1+sqr(x))/(x*y); б) (1+sqrt(x))/(x*y);   в) (1+sqr(x)/x*y);   г) 1+sqrt(x)/x*y;
3. Укажите правильный вариант, осуществляющий ввод 2-х чисел:
   а) writeln(a,b);     б) readln(a,b);       в) writeln(‘a,b’)      г) readln(‘a,b’);
4. Укажите правильный вариант, осуществляющий вывод 2-х чисел:
   а) writeln(a,b);     б) readln(a,b);       в) writeln(‘a,b’)      г) readln(‘a,b’);
5. При каком значении х значение у=5 после выполнения оператора
    if  x> 10 then y:= x/5 else y:=x*5;
   a) x=5;               б) х=50;          в) х=10;              г) х=25.
6. Какой из циклов напечатает на экране слово «МИР» 5 раз в столбик?
    а) for i:=0 to 5 do writeln(‘МИР’);     б)  for i:=10 to 14 do writeln(‘МИР’);
    в) for i:=0 to 4 do write(‘МИР’);        г) for i:=10 to 14 do; writeln(‘МИР’);
7. Строковые переменные приняли значения:
   a:= ‘УРОК’;b:=’ИНФОРМАТИКИ’. Чему равно значение n, если
   n:=length(a)+length(b);
   a) n=’УРОК ИНФОРМАТИКИ’;                           б) n=15;
   в)  n=-7;                                                                     г) n=7;
8. Значение строковой переменной а=’КРИМИНАЛИСТИКА’. Чему равно значение b, если: b=copy(a,4,2)+copy(a,10,5);
   a) НАЛИМ;  б) МАСТИКА;  в) КРИТИКА; г) МИСТИКА.
9. Дан массив 10 целых чисел. В каком варианте дано правильное его описание:
   а) x: array[1..10] of integer;         б) x: array[1..10] of real;       
   в) x: arrеy[1..10] of integer;       г) x:array(1..10) of integer;      

10.         Требуется заполнить массив, описанный в задании 8, генератором случайных чисел и распечатать его в столбик. В каком варианте ответа это сделано верно:
а) for i:=1 to 10 do x[i]:=random(100); writeln(x[i]:4);
б) for i:=1 to 10 do begin x[i]:=random(100); write(x[i]:4); end;
в) for i:=1 to 10 do begin x[i]:=random(100); writeln(x[i]:4); end;
г) for i:=1 to 10 do; begin x[i,j]:=random(100); writeln(x[i,j]:4); end;
11. Матрица 4х5, заполняется генератором случайных чисел и распечатывается в виде таблицы. Выберите правильный вариант, выполняющий эти  действия:

а) for i:=1 to 4 do begin                        for j:=1 to 5 do begin     a[i,j]:=random(100);      writeln(a[i]:6);     end;      writeln;     end;	б) for i:=1 to 4 do begin                        for j:=1 to 5 do begin     a[i,j]:=random(100);      write(a[i,j]:6);     end;      end;
в) for i:=1 to 5 do begin                        for j:=1 to 4 do begin     a[i,j]:=random(100);      write(a[i,j]:6);     end;      writeln;     end;	г) for i:=1 to 4 do begin                         for j:=1 to 5 do begin     a[i,j]:=random(100);      write(a[i,j]:6);     end;      writeln;     end;

Часть В.

1.      Чему равно значение переменной х после выполнения серии команд присваивания:
х:=1;
х:=х*3;
х:=х+1;
х:=sqr(x);
x:=x div3;

2.      Какой ответ будет выведен в результате выполнения фрагмента программы:
х:=5;
if x<5 then writeln(x*2) else writeln(x/2);

3.      Чему будет равно значение переменной S после выполнения цикла
for i:=1 to 5 do S:=S+i;

4.      Значение строковой переменной а=’КООПЕРАЦИЯ’. Чему равно значение b, если: b=copy(a,7,1)+copy(a,1,1)+ copy(a,8,3);

5.      Какую задачу решает данная программа:

Program zadacha;
var x:array[1..15] of integer; a,i: integer;
begin
randomize;
for i:=1 to 15 do x[i]:=random(25);
a:=100;
for i:=1 to 15 do
if a>x[i] then a:=x[i];
writeln(a);
readln
end.

ВАРИАНТ2.

Часть А.

11. Переменная х принимает значения:
    1) 13;                           3)   ‘TEXT’
    2) $;                             4)    10,5
    Укажите, какой тип требуется использовать  для описания переменной х:
    а)  char;       б) real;        в) integer;         г) string. 
12. Укажите вариант правильной записи формулы:
    а)  1+sqrt(x)/2x-1;   б)  (1+sqrt(x))/(2*x-1);    в) (1+sqr(x)/2*x-1);  г) (1+sqr(x))/(2*x-1);
13. Укажите правильный вариант, осуществляющий ввод 3-х чисел:
    а) writeln(‘a,b,c’);   б) readln(‘a,b,c’);   в) writeln(a,b,c)      г) readln(a,b,c);
14. Укажите правильный вариант, осуществляющий вывод 3-х чисел:
    а) writeln(‘a,b,c’);   б) readln(‘a,b,c’);   в) writeln(a,b,c)      г) readln(a,b,c);
15. При каком значении х значение у=5 после выполнения оператора
     if  x< 10 then y:= x*5 else y:=x/5;
    a) x=5;               б) х=50;          в) х=1;              г) х=20.
16. Какой из циклов напечатает на экране слово «МИР» 5 раз в строчку?
     а) for i:=0 to 5 do writeln(‘МИР’);     б)  for i:=10 to 14 do writeln(‘МИР’);
     в) for i:=0 to 4 do write(‘МИР’);        г) for i:=10 to 14 do; write(‘МИР’);
17. Строковые переменные приняли значения:
    a:= ‘УРОК’;b:=’ИНФОРМАТИКИ’. Чему равно значение n, если
    n:=length(a)-length(b);
    a) n=’УРОК ИНФОРМАТИКИ’; б) n=15;
    в)  n=7;                         г) n=-7;
18. Значение строковой переменной а=’КРИМИНАЛИСТИКА’. Чему равно значение b, если: b=copy(a,1,3)+copy(a,11,4);
    a) НАЛИМ;       б) КРИТИКА;       в) МАСТИКА;          г) МИСТИКА.
19. Дан массив 20 вещественных чисел. В каком варианте дано правильное его описание:
    а) x: array[1..20] of integer;         б) x: array[1..20] of real;       
    в) x: array(1…20) of real;             г) x of array[1..20] : integer;      
20. Требуется заполнить массив, описанный в задании 8, генератором случайных чисел и распечатать его в строку. В каком варианте ответа это сделано верно:
    а) for i:=1 to 20 do x[i]:=random(100); write(x[i]:4);
    б) for i:=1 to 20 do begin x[i]:=random(100); writeln(x[i]:4); end;
    в) for i:=1 to 20 do begin x[i]:=random(100); write(x[i]:4); end;
    г) for i:=1 to 20 do; begin x[i,j]:=random(100);  write(x[i,j]:4); end;
21. Матрица 4х3, заполняется генератором случайных чисел и распечатывается в виде таблицы. Выберите правильный вариант, выполняющий эти  действия:

а) for i:=1 to 4 do begin                        for j:=1 to 3 do begin     a[i,j]:=random(100);      write(a[i,j]:6);     end;      writeln;     end;	б) for i:=1 to 4 do begin                        for j:=1 to 3 do begin     a[i,j]:=random(100);      write(a[i,j]:6);     end;      end;
в) for i:=1 to 3 do begin                        for j:=1 to 4 do begin     a[i,j]:=random(100);      write(a[i,j]:6);     end;      writeln;     end;	г) for i:=1 to 4 do begin                        for j:=1 to 3 do begin     a[i,j]:=random(100);      writeln(a[i,j]:6);     end;      writeln;     end;

Часть В.

6.      Чему равно значение переменной х после выполнения серии команд присваивания:
х:=30;
х:=х-3;
х:=х/3;
х:=sqrt(x)+2;
x:=x mod 5;

7.      Какой ответ будет выведен в результате выполнения фрагмента программы:
х:=5;
if x>5 then writeln(x*2) else writeln(x/2);

8.      Чему будет равно значение переменной S после выполнения цикла
for i:=1 to 5 do S:=S+1;

9.      Значение строковой переменной а=’КООПЕРАЦИЯ’. Чему равно значение b, если: b=copy(a,7,1)+copy(a,1,1)+ copy(a,7,3);

10.  Какую задачу решает данная программа:

Program zadacha;
var x:array[1..25] of integer; a,i: integer;
begin
randomize;
for i:=1 to 25 do x[i]:=random(25);
a:=10;
for i:=1 to 25 do
if a<x[i] then writeln(x[i]);
readln
end.

ОТВЕТЫ

Вариант _1________

Часть А
1		2	3	4	5		6	7	8	9	10	11
1)Б	2)Г	А	Б	А	А,Г		Б	Б	Г	А	В	Г
3)А	4)В
Часть В
1	2	3	4			5 Дан массив из 15 целых чисел, не превышающих 25, заполненный ГСЧ. Найти максимальный элемент массива
5	2.5	15	АКЦИЯ

Вариант _2________

Часть А
1		2	3	4	5		6	7	8	9	10	11
1)В	2)А	Б	Г	В	В		В	Г	Б	Б	В	А
3)Г	4)Б
Часть В
1	2	3	4			5 Дан массив из 25 целых чисел, не превышающих 25, заполненный ГСЧ. Распечатать в столбик все элемен­ты массива, большие 10
0	2.5	5	АКАЦИЯ

ФАМИЛИЯ, ИМЯ_____________________________________________________________________

Вариант _________

Часть А
1		2	3	4	5		6	7	8	9	10	11
1)	2)
3)	4)
Часть В
1	2	3	4			5

ФАМИЛИЯ, ИМЯ_____________________________________________________________________

Вариант _________

Часть А
1		2	3	4	5		6	7	8	9	10	11
1)	2)
3)	4)
Часть В
1	2	3	4			5

ФАМИЛИЯ, ИМЯ_____________________________________________________________________

Вариант _________

Часть А
1		2	3	4	5		6	7	8	9	10	11
1)	2)
3)	4)
Часть В
1	2	3	4			5

ФАМИЛИЯ, ИМЯ_____________________________________________________________________

Вариант _________

Часть А
1		2	3	4	5		6	7	8	9	10	11
1)	2)
3)	4)
Часть В
1	2	3	4			5