Тест «Начала программирования на языке Pascal»
Оценка 4.8

Тест «Начала программирования на языке Pascal»

Оценка 4.8
doc
28.02.2020
Тест  «Начала программирования на языке Pascal»
Тест.doc

9 класс

Тест  «Начала программирования»

Вариант 1

 

№ 1  С какого слова обычно начинается программный блок?

 

1)  program

2)  var

3)  begin

4)  write

 

 № 2 Укажите операторы ввода?

 

1)  writeln ()  

2) write ()

3)  readln ()

4)  read ()

 

№ 3 Операция mod позволяет найти...

 

1)  модуль числа

2)  остаток от целочисленного деления

3)  найти результат целочисленного деления одного числа на другое

4)  частное от деления одного числа на другое

 

№ 4 Укажите оператор ветвления:

 

1) For

2) If

3) While

4) Repeat

 

 № 5 Что будет выведено на экран после выполнения серии команд

a:=4;

b:=8;

a:=a / b - 5;

write(abs(a));

 

1) 4.5

2)  4.75

3)  5.25

4) -4.5

 

№ 6 Переменная а является целой. В какой строке при использовании команды присвоить значение допущена ошибка?

 

1)  a:=SQRT(a);

2) a:=sqr(5);

3)  a:=a / 5-1;

4)  a:=abs(2*a);

 

№ 7 Каким служебным словом описывается строка символов?

 

1)  INTEGER;

2)  REAL;

3)  STRING

4)  CHAR;

 

№ 8 Что будет выведено на экран после выполнения серии команд

a:=4;

b:=2;

a:=b-a div 3;

write(a);

 

1) 1 2

2) 5

3) 1.7

4) 1

 

 № 9  Запишите значение переменной sum после выполнения фрагмента программы:

sum := 0;

for k := 5 to 9 do

sum := sum + i;

  

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

 

Алгоритмический язык

Паскаль

алг

нач

целтаб Dat[1:10]

цел k, m

Dat[1] := 16

Dat[2] := 20

Dat[3] := 20

Dat[4] := 41

Dat[5] := 14

Dat[6] := 21

Dat[7] := 28

Dat[8] := 12

Dat[9] := 15

Dat[10] := 35

m := 0

нц для k от 1 до 10

если Dat[k]>m то

m := Dat[k]

все

кц

вывод m

кон

Var k, m: integer;

Dat: array[1..10] of integer;

Begin

Dat[1] := 16; Dat[2] := 20;

Dat[3] := 20; Dat[4] := 41;

Dat[5] := 14; Dat[6] := 21;

Dat[7] := 28; Dat[8] := 12;

Dat[9] := 15; Dat[10] := 35;

m := 0;

for k := 1 to 10 do

if Dat[k]>m then

begin

m := Dat[k]

end;

writeln(m);

End.

 

 

9 класс

Тест  «Начала программирования»

Вариант 2

 

№ 1 Какая из переменных может не является целой?

 

1) a:=2;

2)  b:=4 div 7;

3)  c:=-25;

4)  d:=d / 6;

 

№ 2 Операция div позволяет найти...

 

1)  дробную часть числа

2)  остаток от целочисленного деления

3)  найти результат целочисленного деления одного числа на другое

4)  частное от деления одного числа на другое

 

№ 3 Какое значение получит переменная a после выполнения серии команд

a:=5;

b:=2;

a:=b * a - sqr(a) ;

 

1) -15

2) 15

3) 40

4) 10

 

№ 4 Что будет выведено на экран после выполнения серии команд

a:=5;

b:=2;

a:=b-a mod 4;

write(`a=`,a);

 

1) 2

2)  a=2

3)  a=1

4)  a=0

 

№ 5 Укажите оператор цикла с известным число повторений:

 

1) IF

2) FOR

3) WHILE

4) REPEAT

5) BEGIN

 

 

 

 

№ 6 Каким служебным словом описываются дробные переменные:

 

1) INTEGER;

2)  REAL;

3)  CHAR;

4)  STRING

 

№ 7 Раздел описаний VAR используется для описания:

 

1) Констант;

2) Меток;

3) Функций;

4) Переменных;

 

№ 8 Укажите операторы вывода?

 

1)  writeln ()  

2) write ()

3)  readln ()

4)  read ()

 

№ 9  За­пи­ши­те зна­че­ние пе­ре­мен­ной s, после выполнения фрагмента программы:

  s := 0;

for k := 3 to 7 do

s := s + 6;

 

№ 10 В таб­ли­це Dat хра­нят­ся от­мет­ки уча­щих­ся 9 клас­са за са­мо­сто­я­тель­ную ра­бо­ту (Dat[1] – от­мет­ка пер­во­го учащегося, Dat[2] – вто­ро­го и т. д.). Определите, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Алгоритмический язык

Паскаль

алг

нач

цел­таб Dat[1:10]

цел k, m

Dat[1] := 4

Dat[2] := 5

Dat[3] := 4

Dat[4] := 3

Dat[5] := 2

Dat[6] := 3

Dat[7] := 4

Dat[8] := 5

Dat[9] := 5

Dat[10] := 3

m := 0

нц для k от 1 до 10

если Dat[k] < 4 то

m := m + Dat[k]

все

кц

вывод m

кон

Var k, m: integer;

Dat: array[1..10] of integer;

Begin

Dat[1] := 4; Dat[2] := 5;

Dat[3] := 4; Dat[4] := 3;

Dat[5] := 2; Dat[6] := 3;

Dat[7] := 4; Dat[8] := 5;

Dat[9] := 5; Dat[10] := 3;

m := 0;

for k := 1 to 10 do

if Dat[k] < 4 then

begin

m := m + Dat[k];

end;

writeln(m);

End.

 


Тест «Начала программирования»

Тест «Начала программирования»

Каким служебным словом описывается строка символов? 1)

Каким служебным словом описывается строка символов? 1)

Тест «Начала программирования»

Тест «Начала программирования»

Каким служебным словом описываются дробные переменные: 1)

Каким служебным словом описываются дробные переменные: 1)
Скачать файл
Бесплатно учителям.
Свидетельство СМИ.
Приз 150 000 руб. ежемесячно.
10 документов.