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

 

Вариант 1

 

1. Что из ниже перечисленного не входит в набор основных символов Турбо Паскаля?

a) латинские строчные и прописные буквы

b) служебные слова

c) десять цифр

d) русские строчные и прописные буквы

e) знак подчеркивание

 

2. Какой оператор из перечисленных является оператором присваивания?

a) =                        b) ==                      c) =:                       d) :=

 

3. Какие типы циклов существуют в языке Паскаль?

a) for                     b) do...while                         c) while

d) repeat...until                    e) loop

 

4. Последовательное выполнение команд языка Паскаль вида:

                a:=abs(-3)+trunc(1,6)*(6 mod 4);

                b:=max(a mod 5, a div 3)* sqrt(a+4);

                c:=int(a/4)+sqr(b-1)+sqr(b+a)   

определит значение:      a) 68      b) 69      c) 71       d) 72      e) 65

 

5. Служебное слово VAR в программе на языке Pascal фиксирует начало раздела программы, содержащего:

a) операторы;                    b) список меток;                c) описание сложных типов данных;

d) перечень констант;                     e) описание переменных.

 

6. Числа в языке Pascal различаются:

a) как натуральные и целые;

b) как целые и вещественные;

c) как натуральные и вещественные;

d) как целые и иррациональные;

e) как целые и рациональные.

 

7. Оператор организации ввода данных с клавиатуры в системе программирования Turbo Pascal записывается с использованием служебного слова:

a) WRITE;           b) INPUT;             c) READ;              d) DEFFN;            e) RESET.

 

8. Операторы в программе на языке Pascal отделяются друг от друга:

a) апострофом;                                 b) двоеточием;                   c) пробелом; 

d) запятой;                          e) точкой с запятой.

 

9. Дана программа:

                Program T21;

                Var X: Integer;

                  Begin

                     Readln(X);

                     If X MOD 2<>0 Then Writeln(‘ДА’)

                     Else Writeln(‘НЕТ’)

                End.

При каком значении X будет получен ответ “ДА”?        a) 16;     b) 44;     c) 15;    d) 8;

 

10. Что изменяет операция присваивания?

a) тип переменной                                           b) имя переменной           

c) значение переменной                                 d) тип алгоритма

 

11. Напишите результат выполнения фрагмента программы для начального n=3418:

                While n >100 do

                begin

                n:=n div 10;

                end;

Запишите конечное значение переменной n.

 

12. Какие значения примут переменные А и С в результате выполнения представленного алгоритма (на рисунке)?

http://oivt.ru/system/files/images/1_2.thumbnail.png

 

 

13. Написать программу вычисления примера:

http://oivt.ru/system/files/images/2_3.thumbnail.png

 

14. По заданному порядковому номеру дня недели напечатать его название и указать рабочий это день или не рабочий (оператор выбора Case).

                Например: Введите № дня недели -> 1                    Это Понедельник (рабочий)

 

15. Цикл. Найти сумму положительных кратных 7 чисел, меньших 100.

 

 

 

Вариант 2

 

1. Какое из следующих описаний переменных является ошибочным?

a) Operator: (plus, minus, times);

b) stroka, stroka2: string;

c) Done,Error: boolean;

d) I,J,K: integer;

 

2. Какой оператор не относится к группе операторов ввода-вывода языка Паскаль?

a) Read(A1,A2,...AK);                                      b) WriteLn(A1,A2,...AK);

c) PrintLn;                                                           d) ReadLn;

 

3. В каком из условных операторов допущена синтаксическая ошибка?

a) if B = 0 then Writeln('Деление на нуль невозможно.');

b) if a > b then max := a else max := b;

c) if (a>b) and (b>0) then c:=a+b;

d) if a < b then min := a; else min := b;

 

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

a) Заголовка       b) Примечания                   c) Описаний                        d) Операторов

 

5. Значение переменной s после выполнения фрагмента программы вида:

                s:=0;

                i:=1;

                while (i<5) do

                    begin

                       i:=i+1;

                       s:=s+1

                     end;                                 

будет равно ...                   a) 9         b) 10      c) 14       d) 15      e) 17

 

6. В алфавит языка Pascal не входит служебное слово:

a) THEN;              b) BEGIN;            c) END;                 d) STEP;               e) IF

 

7. Служебное слово CONST в программе на языке Pascal фиксирует начало раздела программы, содержащего:

a) перечень констант;

b) список меток;

c) описание переменных;

d) операторы;

e) описание сложных типов данных.

 

8. При записи оператора вывода на языке Pascal используется служебное слово:

a) WRITE;           b) RESET;            c) READ;              d) BEGIN;            e) WHILE.

 

9. Дана программа:

                Program T21;

                Var X: Integer;

                  Begin

                     Readln(X);

                     If X MOD 2=0 Then Writeln(‘ДА’)

                     Else Writeln(‘НЕТ’)

                End.

При каком значении X будет получен ответ “ДА”?        a) 7;     b) 4;     c) 15;    d) 3;

 

10. Название программы, в которой в зависимости от истинности (ложности) проверяемого условия выполняется одна или другая серия команд?

a) линейная         b) подпрограмма              c) разветвляющаяся         d) циклическая                                                 

11. Напишите результат выполнения фрагмента программы для начального n=4625:

                While n > 100 do

                begin

                n:=n div 10;

                end;

Запишите конечное значение переменной n.

 

12. Какие значения примут переменные А и С в результате выполнения представленного алгоритма (на рисунке)?

http://oivt.ru/system/files/images/3_0.thumbnail.png

 

13. Написать программу вычисления примера:

 

 

14. По заданному номеру месяца будет  напечатано его название и указать, количество дней в месяце (оператор выбора Case).

                Например: Введите № месяца -> 1                           Это Январь (дней - 31)

 

*15.Цикл. Составить программу вычисления суммы квадратов чисел от 1 до 100.

Классы: