Хелпикс

Главная

Контакты

Случайная статья



if D[k] < 25 then



 

Тест на тему: «Программирование на Pascal»

Время выполнения теста 15 минут, тест состоит из 2х частей по уровням сложности. Первый уровень A состоит из 10 вопросов с выбором ответа(в каждом задании только 1 верный ответ), второй уровень B состоит из 4 вопросов, где надо указать получившийся ответ

Уровень сложности А

1. Какой символ необходим для разделения операторов?

а) =

б) ;

в) :

г) :=

2. Какое имя объекта недопустимо в Pascal?

а) 167y

б) UIP

в) Tr15

г) zima

3. Выберите число относящееся к типу real:

а) 16

б) C

в) 16.31

г) 28700

4. Выберите верный символ или набор символов, который называется оператором присваивания

а) =

б) ;=

в) :=

г) ==

5. Каким словом обозначается оператор вывода в Pascal

а) Read

б) Write

в) Wrote

г) readen

6. Какая арифметическая операция служит для получения остатка от деления

а) Div

б) Dov

в) Mot

г) Mod

7. Какая функция поможет посчитать квадрат от числа х?

а) sqrt(x)

б) sql(x)

в) sqr(x)

г) sqv(x)

8. Как выглядит логическая операция «дизъюнкция» в Pascal?

а) Not

б) Or

в) And

г) &&

9. Выберите правильную запись выражения «А не равно 4»

а) А!=4

б) А=4

в) А==4

г) А<>4

10. Какое из нижеперечисленных утверждений верно?

а) If(f>2) then а:=3 еlse a:=5;

б) If(f>2) then а:=3; еlse a:=5;

в) If(f>2) then а=3; еlse a=5;

г) If(f>2) а:=3; еlse a:=5;

 

Уровень сложности В

11. Определите значение переменной С после выполнения алгоритма:

С:=1;

А:=С+11;

С:=С+А;

12. Запишите зна­че­ние переменной t, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы.

Var s,t: integer;

Begin

t := 0;

for k := 4 to 7 do

t := t + 41;

writeln(t);

End.

 

13. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы.

Var r, k: integer;

Begin

r := 3;

for k :=4 downto 1 do

r := r*2;

write (r);

End.

 

14. В таб­ли­це D хра­нят­ся дан­ные о ко­ли­че­стве уче­ни­ков в клас­сах (D[1] — ко­ли­че­ство уче­ни­ков в пер­вом классе, D[2] — во вто­ром и т. д.). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы.

Var k, m: integer;       

D: array[1..11] of integer;

Begin                    

D[1] := 20;

D[2] := 27;

D[3] := 19;

D[4] := 28;  

D[5] := 26;  

D[6] := 22;  

D[7] := 24;  

D[8] := 28;  

D[9] := 26;  

D[10] := 21;

D[11] := 27;          

m := 0          

for k := 1 to 11 do   

if D[k] < 25 then

begin           

m := D[k];

end;                     

writeln(k);              

End.

 

 

Критерии: Блок А: 1 балл за верное задание, блок В: 2 балла за верное задание,

оценка «5» - 16-18 балла

Оценка «4» -12-15 баллов

Оценка «3» - 6-11 баллов

Оценка «2» - 5 баллов и менее

 

 
  

© helpiks.su При использовании или копировании материалов прямая ссылка на сайт обязательна.