Тест по информатике в 8 классе по теме «Условный оператор в языке Pascal»
Данный тест дается для проверки знаний по информатике в 8 классе по теме «Условный оператор в языке Pascal». Задания расположены от самых простых до сложных.
Вариант1
Задание: Что будет выведено в результате выполнения части программы, если ввести следующие данные?
|
№ |
Программа | Входные данные |
|
Обязательная часть: |
||
|
1 |
WRITE (‘Введи два числи’); READ (А,В); IF A>B THEN S:= A ELSE S:=B; WRITE (S); |
10, 18 |
|
2 |
WRITE (‘Введите число’); READ ( X); IF X<=10 THEN Y:=210 ELSE Y:=X*X*X ; WRITE (Y); |
4 |
|
3 |
WRITE (‘Введите два числа’); READ (А,В); IF A=В THEN BEGIN Х:=А; Y:=B; GOTO 50; END; IF A>B THEN BEGIN X:=B*B; У:=A; END ELSE BEGIN X:=A*A; Y:= В; END; 50: WRITE (X, Y); |
-23, 11 |
|
4 |
WRITE (‘Введите три числа’); READ ( X,Y,Z); IF (X>= У) AND (Y>=-Z) THEN BEGIN X:=ABS(X); Y:=ABS(Y); Z:=ABS(Z); END ELSE BEGIN X:=X*2; Y:=Y*2; Z:=Z*2; END; WRITE( X, Y,Z); |
1 ,-5, 78 |
|
5 |
WRITE(‘Введите три числи’); READ ( А,В,С); М:=А; IF B IF C Р:=А*В*С/М; WRITE (P); |
12,34,-5 |
|
6 |
WRITE "Ввести число"; READ ( Х); IF X<-2 THEN BEGIN Y:=X+4; GOTO 50; END; IF X> 2 THEN Y:=4-X ELSE Y:=2; 50: WRITE (‘ При Х=’, X,’Y=’, Y); |
15 |
|
Дополнительная часть: |
||
|
7 |
WRITE(‘Введите значение Y’); READ ( Y); IF Y<0 THEN BEGIN F=Y*Y-0.3; GOTO 60; END; IF Y<=1 THEN BEGIN F=0; GOTO 60; END; F:=Y*Y-2*Y; 60: X:=F-6.3; WRITE (Y , X); |
4 |
|
8 |
WRITE (‘Введите два числа’) READ ( M, N); X:=ABS(M) ; Y:=ABS(N); 40: IF X=Y THEN GOTO 70 IF X> Y THEN X:=X- Y ELSE Y:= Y-X GOTO 40 70: WRITE (X); |
30, 20 |
Вариант 2
Задание: Что напечатается в результате выполнения программы, если ввести следующие данные?
|
№ |
Программа |
Входные данные |
|
Обязательная часть: |
||
|
1 |
WRITE (‘Введи два числи’); READ (А,В); IF A>B THEN S:= A ELSE S:=B; WRITE (S); |
5, 78 |
|
2 |
WRITE (‘Введите число’); READ ( X); IF X<=10 THEN Y:=210 ELSE Y:=X*X*X ; WRITE (Y); |
-7 |
|
3 |
WRITE (‘Введите два числа’); READ (А,В); IF A=В THEN BEGIN Х:=А; Y:=B; GOTO 50; END; IF A>B THEN BEGIN X:=B*B; У:=A; END ELSE BEGIN X:=A*A; Y:= В; END; 50: WRITE (X, Y); |
12, 4 |
|
4 |
WRITE (‘Введите три числа’); READ ( X,Y,Z); IF (X>= У) AND (Y>=-Z) THEN BEGIN X:=ABS(X); Y:=ABS(Y); Z:=ABS(Z); END ELSE BEGIN X:=X*2; Y:=Y*2; Z:=Z*2; END; WRITE( X, Y,Z); |
12 ,-6, 5 |
|
5 |
WRITE(‘Введите три числи’); READ ( А,В,С); М:=А; IF B IF C Р:=А*В*С/М; WRITE (P); |
122,-6, 3 |
|
6 |
WRITE (‘Ввести число’); READ ( Х); IF X<-2 THEN BEGIN Y:=X+4; GOTO 50; END; IF X> 2 THEN Y:=4-X ELSE Y:=2; 50: WRITE (‘ При Х=’, X,’Y=’, Y); |
-5 |
|
Дополнительная часть: |
||
|
7 |
WRITE(‘Введите значение Y’); READ ( Y); IF Y<0 THEN BEGIN F=Y*Y-0.3; GOTO 60; END; IF Y<=1 THEN BEGIN F=0; GOTO 60; END; F:=Y*Y-2*Y; 60: X:=F-6.3 WRITE (Y , X); |
-6 |
|
8 |
WRITE (‘Введите два числа’) READ ( M, N); X:=ABS(M) ; Y:=ABS(N); 40: IF X=YTHEN GOTO 70 IF X> Y THEN X:=X- Y ELSE Y:= Y-X GOTO 40 70: WRITE (X); |
-56, 8 |
Вариант 3
Задание: Что будет выведено в результате выполнения части программы, если ввести следующие данные?
|
№ |
Программа |
Входные данные |
|
Обязательная часть: |
||
|
1 |
WRITE (‘Введи два числи’); READ (А,В); IF A>B THEN S:= A ELSE S:=B; WRITE (S); |
12, 12 |
|
2 |
WRITE (‘Введите число’); READ ( X); IF X<=10 THEN Y:=210 ELSE Y:=X*X*X ; WRITE (Y); |
10 |
|
3 |
WRITE (‘Введите два числа’); READ (А,В); IF A=В THEN BEGIN Х:=А; Y:=B; GOTO 50; END; IF A>B THEN BEGIN X:=B*B; У:=A; END ELSE BEGIN X:=A*A; Y:= В; END; 50: WRITE (X, Y); |
2, 5 |
|
4 |
WRITE (‘Введите три числа’); READ ( X,Y,Z); IF (X>= У) AND (Y>=-Z) THEN BEGIN X:=ABS(X); Y:=ABS(Y); Z:=ABS(Z); END ELSE BEGIN X:=X*2; Y:=Y*2; Z:=Z*2; END; WRITE( X, Y,Z); |
12, 23, -6 |
|
5 |
WRITE(‘Введите три числи’); READ ( А,В,С); М:=А; IF B IF C Р:=А*В*С/М; WRITE (P); |
2, -6, -45 |
|
6 |
WRITE "Ввести число"; READ ( Х); IF X<-2 THEN BEGIN Y:=X+4; GOTO 50; END; IF X> 2 THEN Y:=4-X ELSE Y:=2; 50: WRITE (‘ При Х=’, X,’Y=’, Y); |
6 |
|
Дополнительная часть: |
||
|
7 |
WRITE(‘Введите значение Y’); READ ( Y); IF Y<0 THEN BEGIN F=Y*Y-0.3; GOTO 60; END; IF Y<=1 THEN BEGIN F=0; GOTO 60; END; F:=Y*Y-2*Y; 60: X:=F-6.3 WRITE (Y , X); |
-3 |
|
8 |
WRITE (‘Введите два числа’) READ ( M, N); X:=ABS(M) ; Y:=ABS(N); 40: IF X=YTHEN GOTO 70 IF X> Y THEN X:=X- Y ELSE Y:= Y-X GOTO 40 70: WRITE (X); |
100,75 |
Вариант 4
Задание: Что будет выведено в результате выполнения части программы, если ввести следующие данные?
|
№ |
Программа |
Входные данные |
|
Обязательная часть: |
||
|
1 |
WRITE (‘Введи два числи’); READ (А,В); IF A>B THEN S:= A ELSE S:=B; WRITE (S); |
14, -11 |
|
2 |
WRITE (‘Введите число’); READ ( X); IF X<=10 THEN Y:=210 ELSE Y:=X*X*X ; WRITE (Y); |
-23 |
|
3 |
WRITE (‘Введите два числа’); READ (А,В); IF A=В THEN BEGIN Х:=А; Y:=B; GOTO 50; END; IF A>B THEN BEGIN X:=B*B; У:=A; END ELSE BEGIN X:=A*A; Y:= В; END; 50: WRITE (X, Y); |
-45,3 |
|
4 |
WRITE (‘Введите три числа’); READ ( X,Y,Z); IF (X>= У) AND (Y>=-Z) THEN BEGIN X:=ABS(X); Y:=ABS(Y); Z:=ABS(Z); END ELSE BEGIN X:=X*2; Y:=Y*2; Z:=Z*2; END; WRITE( X, Y,Z); |
4, -5, 87 |
|
5 |
WRITE(‘Введите три числи’); READ ( А,В,С); М:=А; IF B IF C Р:=А*В*С/М; WRITE (P); |
22, 3,-6 |
|
6 |
WRITE "Ввести число"; READ ( Х); IF X<-2 THEN BEGIN Y:=X+4; GOTO 50; END; IF X> 2 THEN Y:=4-X ELSE Y:=2; 50: WRITE (‘ При Х=’, X,’Y=’, Y); |
-7 |
|
Дополнительная часть: |
||
|
7 |
WRITE(‘Введите значение Y’); READ ( Y); IF Y<0 THEN BEGIN F=Y*Y-0.3; GOTO 60; END; IF Y<=1 THEN BEGIN F=0; GOTO 60; END; F:=Y*Y-2*Y; 60: X:=F-6.3 WRITE (Y , X); |
5 |
|
8 |
WRITE (‘Введите два числа’) READ ( M, N); X:=ABS(M) ; Y:=ABS(N); 40 IF X=YTHEN GOTO 70 IF X> Y THEN X:=X- Y ELSE Y:= Y-X GOTO 40 70: WRITE (X); |
18, -9 |
Ответы на тесты
|
Задание |
Вар. 1 |
Вар. 2 |
Вар. 3 |
Вар. 4 |
|
1 |
18 |
78 |
12 |
14 |
|
2 |
210 |
210 |
210 |
210 |
|
3 |
529, 11 |
16, 12 |
4, 5 |
2025, 3 |
|
4 |
1, 5, 78 |
24, -12, 10 |
24, 46, -12 |
4, 5, 87 |
|
5 |
408 |
366 |
-12 |
66 |
|
6 |
Х= 15 У= -11 |
Х= -5 У= -1 |
Х= 6 У= -2 |
Х= -7 У= -3 |
|
7 |
4, 1.7 |
-6, 29.4 |
-3, 2.4 |
5, 8.7 |
|
8 |
10 |
8 |
25 |
9 |
