Проверочная работа по языку программирования Pascal
материал по информатике и икт (10 класс) на тему

Вариант1

1. Запишите в общем виде оператор цикла с параметром
2. Определите тип чисел: 15.8, 601.0, 0.241.
3. Какое действие выполняет оператор write
4. Определите значение переменной a после выполнения алгоритма

a:=7;

b:=5+a;

b:=a+b+1;

a:=b/4*3-a;

5. Определите результат выполнения операции 23 div 2
6. Определите, что будет напечатано в результате выполнения следующего алгоритма

var k,m,num:integer;

dat: array[1..10] og integer;

begin

dat[1]:=7; dat[2]:=-8; dat[3]:=3; dat[4]:=6; dat[5]:=-4; dat[6]:=3;

dat[7]:=5; dat[8]:=-5; dat[9]:=7; dat[10]:=1;

num:=1; m:=dat[1];

for k:=2 to 10 do begin

if dat[k]*m<0 then

begin

m:=dat[k]; num:=k;

end;

end;

write (num);

end.

7. Что такое массив?
8. Напишите, используя алгоритмический язык или ЯП Pascal, алгоритм определения взаимно противоположных чисел среди a,b,c.

Вариант 2

1. Запишите в общем виде условный оператор
2. Определите тип чисел: 15, 61.0, 241.
3. Какое действие выполняет оператор read
4. Определите значение переменной a после выполнения алгоритма

a:=6;

b:=4+a;

b:=a+b;

a:=b/4*3-a;

5. Определите результат выполнения операции 23 mod 2
6. Определите, что будет напечатано в результате выполнения следующего алгоритма

var k,m,day:integer;

dat: array[1..10] og integer;

begin

dat[1]:=7; dat[2]:=2; dat[3]:=3; dat[4]:=3; dat[5]:=4; dat[6]:=4;

dat[7]:=5; dat[8]:=5; dat[9]:=7; dat[10]:=6;

day:=1; m:=dat[1];

for k:=2 to 10 do begin

if dat[k]>=m then

begin

m:=dat[k]; day:=k;

end;

end;

write (day);

end.

7. Что такое одномерный массив?
8. Напишите, используя алгоритмический язык или ЯП Pascal, алгоритм нахождения большего из трех чисел.

Вариант3

1. Запишите в общем виде оператор цикла с предусловием
2. Определите тип чисел: 8, 0, 241.
3. Какое действие выполняет оператор writeln
4. Определите значение переменной a после выполнения алгоритма

a:=2;

b:=1+a;

b:=a+b;

a:=a/2*2*b-4;

5. Определите результат выполнения операции 19 div 2
6. Определите, что будет напечатано в результате выполнения следующего алгоритма

var k,m,day:integer;

dat: array[1..10] og integer;

begin

dat[1]:=7; dat[2]:=1; dat[3]:=3; dat[4]:=3; dat[5]:=2; dat[6]:=2;

dat[7]:=5; dat[8]:=5; dat[9]:=7; dat[10]:=1;

day:=1; m:=dat[1];

for k:=2 to 10 do begin

if dat[k]

begin

m:=dat[k]; day:=k;

end;

end;

write (day);

end.

7. Что такое индекс элемента?
8. Напишите, используя алгоритмический язык или ЯП Pascal, алгоритм определения количества отрицательных чисел среди a,b,c.

Вариант 4

1. Запишите в общем виде оператор цикла с постуловием
2. Определите тип чисел: 1.8, 1.0, 41
3. Какое действие выполняет оператор readln
4. Определите значение переменной b после выполнения алгоритма

a:=3;

b:=2+a;

a:=b*2*a;

b:=2*a-b;

5. Определите результат выполнения операции 15 mod 3
6. Определите, что будет напечатано в результате выполнения следующего алгоритма

var k,m:integer;

dat: array[1..10] og integer;

begin

dat[1]:=45; dat[2]:=55; dat[3]:=40; dat[4]:=15; dat[5]:=20; dat[6]:=80;

dat[7]:=35; dat[8]:=70; dat[9]:=10; dat[10]:=45;

m:=dat[1];

for k:=2 to 10 do begin

if dat[k]

begin

m:=m+dat[k]; ;

end;

end;

write (m);

end.

7. Сколько существует способов заполнения массива? Перечислите их.
8. Напишите, используя алгоритмический язык или ЯП Pascal, алгоритм проверки четности числа.