Контрольная работа по программированию Pascal

 Контрольная работа, по темам языка программирования Паскаль, условный оператор, оператор выбора, оператор цикла, линейная программа.

С

9 класс

Урок № 14

Тақырып

Тема: Контрольная работа.

Оқыту мен тәрбиелеудін мiндеттерi

Учебно-воспитательные задачи:

1.Проверить знания и умения по темам: Линейная программа, Условный оператор, Составной оператор, Оператор выбора, Оператор цикла.

2 . Развивать внимательность, логическое мышление.

3. Воспитывать настойчивость, самостоятельность.

Кұрал - жабдыктар, корнектi күралдар

Оборудование, наглядные пособия: Карточки с заданиями.

Сабақ тyрі:

Тип урока: Контрольный.

Сабақ барысы

Ход урока.

1. Оргмомент.

2. Повторение.

• Назовите условный оператор и его структуру;

• Когда применяется составной оператор?

• Оператор выбора предназначен для…

• Оператор цикла – это…

1. Контрольная работа.

1 вариант.

Задание №1

Вычислить

Y=cos;

Задание №2

Y=

Задание №3

Y=

Задание №4.

Напишите программу: По заданному порядковому номеру дня недели напечатать его название и указать рабочий это день или не рабочий.

Задание №5. Найти значение функции У = Х² – 1, для

Х = 0,1; 0,2;0,3;…;20

2 вариант.

Задание №1

Вычислить

Y=cos;

Задание №2

Y=

Задание №3

Y=

Задание №4.

Напишите программу: По заданному номеру месяца будет напечатано его название и указать, количество дней в месяце.

.Задание №5. Найти значение функции У =Х²+ 1, для

Х = 0,2; 0,4;0,6;…;20

1. Решение контрольной работы.

2. Итог урока.

3. Д/З. повторить.

Решение к/работы.

1 вариант

Задание №1

VAR X, Y: REAL;

BEGIN

READLN (X);

Y: = cos (sqrt(x+2) / (2*x+12));

WRITELN (‘Y=’, Y);

READLN;

END.

Задание №2

VAR X, Y: REAL;

BEGIN

READLN (X);

IF XЕN Y := sqr(x)+3 ELSE Y:=2*sqr(x)+4;

WRITELN (‘Y=’, Y);

READLN;

END.

Задание №3

VAR X, Y: REAL;

BEGIN

READLN (X);

IF X

IF X 2 THENY:=cos(x) ELSE Y:=SQRT(X - 1);

WRITELN (‘Y=’, Y);

READLN;

END.

Задание №4

LABEL 10;

VAR N: INTEGER;

BEGIN

READLN (N);

CASE N OF

1: WRITELN (‘понедельник, рабочий’);

2: WRITELN (‘вторник, рабочий’);

3: WRITELN (‘среда, рабочий’);

4: WRITELN (‘четверг, рабочий’);

5: WRITELN (‘пятница, рабочий’);

6: WRITELN (‘суббота, нерабочий’);

7: WRITELN (‘воскресенье, нерабочий’);

END;

READLN;

END.

Задание №5

VAR X, Y: REAL;

BEGIN

X: = 0.1;

WHILE X

BEGIN

Y: = X *X - 1;

WRITELN (‘Y=’, Y);

X: = X + 0.1;

END;

READLN;

END.

2 вариант

Задание №1

VAR X, Y: REAL;

BEGIN

READLN (X);

Y: = cos (sqrt(x-1) / (х+1));

WRITELN (‘Y=’, Y);

READLN;

END.

Задание №2

VAR X, Y: REAL;

BEGIN

READLN (X);

IF XЕN Y: = sin(8*x) ELSE Y:=2*x+4;

WRITELN (‘Y=’, Y);

READLN;

END.

Задание №3

VAR X, Y: REAL;

BEGIN

READLN (X);

IF X

IF X 4 THENY:=x+5*x+12 ELSE Y:=SQRT(sqr(x)- 8);

WRITELN (‘Y=’, Y);

READLN;

END.

Задание №4

LABEL 10;

VAR N: INTEGER;

BEGIN

READLN (N);

CASE N OF

1: WRITELN (‘январь, 31’);

2: WRITELN (‘февраль, 28’);

3: WRITELN (‘март, 31’);

4: WRITELN (‘апрель, 30’);

5: WRITELN (‘май, 31’);

6: WRITELN (‘июнь, 30’);

END;

READLN;

END.

Задание №5

VAR X, Y: REAL;

BEGIN

X: = 0.2;

WHILE X

BEGIN

Y: = X *X + 1;

WRITELN (‘Y=’, Y);

X: = X + 0.2;

END;

READLN;

END.

Контрольная работа

1 вариант.

Задание №1

Вычислить

Y=cos;

Задание №2

Y=

Задание №3

Y=

Задание №4.

Напишите программу: По заданному порядковому номеру дня недели напечатать его название и указать рабочий это день или не рабочий.

Задание №5. Найти значение функции У = Х² – 1, для

Х = 0,1; 0,2;0,3;…;20

Контрольная работа.

2 вариант.

Задание №1

Вычислить

Y=cos;

Задание №2

Y=

Задание №3

Y=

Задание №4.

Напишите программу: По заданному номеру месяца будет напечатано его название и указать, количество дней в месяце.

.Задание №5. Найти значение функции У =Х²+ 1, для

Х = 0,2; 0,4;0,6;…;20