Скрыть поздравление
Посмотреть все поздравления
Ольга Юрьевна Мазанова
Милые дамы! Дорогие коллеги! От всей души поздравляю Вас с прекрасным весенним праздником, позволяющим помнить, что прежде всего мы ЖЕНЩИНЫ! счастья!
12+  Свидетельство СМИ ЭЛ № ФС 77 - 70917
Лицензия на образовательную деятельность №0001058
Пользовательское соглашение     Контактная и правовая информация
 
Педагогическое сообщество
УРОК.РФУРОК
Материал опубликовала
Ярошевская В. И.63
Россия, Москва, Москва

Данный тест дается для проверки знаний по информатике в 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

Опубликовано в группе «УРОК.РФ: группа для участников конкурсов»


Комментарии (0)

Чтобы написать комментарий необходимо авторизоваться.