Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
КР2 Типы данных, операторы циклов, графика.doc
Скачиваний:
13
Добавлен:
13.09.2019
Размер:
145.41 Кб
Скачать

Контрольная работа по теме «Типы данных, операторы циклов, графика» Билет 2

  1. Напишите все известное вам о булевском типе данных.

  2. Напишите, что и в какой последовательности будет выведено на экран в результате выполнения следующей программы. (Нарисовать в точности, как это будет выглядеть на экране):

Var a:integer;

b:real;

begin

a:=2; b:=3;

writeln(a);

write(a*b:5:2);

writeln(‘ End’);

end.

  1. Напишите фрагмент программы вычисляющей значение переменной y по следующим формулам:

п ри четных x при нечетных х

  1. Найдите все ошибки в программе и исправьте их:

Var x,y:char;

I:integer;

Begin

Writeln(‘введите’x);

Y:=20;

If x:= 5 then y:=y*x;

Writeln(‘y равен , y’);

End.

  1. Какое значение будет иметь переменная z после выполнения операторов:

z:=0; if x>0 then if y>0 then z:=1 else z:=2; если x=1 и y=-1?

  1. Вычислите значение выражения chr(ord(‘5’)+1)?

1) 54 2) ‘54’ 3) ‘6’ d) 6

  1. Что будет выведено на экран в результате выполнения следующей программы. (Известно, что код символа с равен 99):

Var c:char;

Begin

c:=’A’;

writeln(‘c’);

writeln(c);

Writeln(char(ord(‘c’)),’ ‘,succ(c));

End.

  1. Какие значения примут переменные с и d после выполнения следующего фрагмента программы:

c:=1;  d:=10; while d<100 do

begin

c:=c*2;

d:=d+10;

end;

  1. Какое значение примет переменная А после выполнения следующего фрагмента программы:

А:=0;  x:=1; repeat А:=А+x; x:=х*2 until x>=30;

  1. Какое значение примет переменная А после выполнения следующего фрагмента программы:

А:=0;   b:=false; while not b do

begin А:=А+5; if A>20 then b:=true;

end;

  1. Практическое задание 1. Известны размеры (ширина, длина, высота) двух ящиков. Определить, объем какого ящика больше. Размеры меньшего ящика увеличить в два раза и снова сравнить объемы двух ящиков. Вывести на экран больший объем.

  1. Практическое задание 2. Напишите программу, рисующую в центре экрана разными цветами квадраты со сторонами от 20 до 400 пикселей с шагом в 20 пикселей.

Контрольная работа по теме «Типы данных, операторы циклов, графика» Билет 3

  1. Напишите все известное вам о вещественном типе данных.

  2. Выберите правильное высказывание:

        1. интерпретатор может быть компилятором или транслятором;

        2. транслятор может быть компилятором или интерпретатором;

        3. компилятор может быть интерпретатором или транслятором.

  1. Какие из выражений записаны с синтаксической ошибкой?

1) x>0 or y=4; 2) sqr(x)+sqrt(x); 3) (x>5) and (ord(x)>48).

  1. Чему равно выражение not (a and b) при a=true и b=false?

1) true 2) false

  1. Какое значение будет иметь переменная z после выполнения операторов:

z:=0; if x>0 then if y>0 then z:=1 else z:=2; если x=-1 и y=-1?

  1. Всегда ли справедливо следующее утверждение: chr(ord(c))=c для любого символа c?

1) да 2) нет

  1. Указать порядок выполнения операций при вычислении выражения:

(x>=0) or true and (x=3) or (y*y<>4).