Проверочная работа по теме Одномерные массивы

Вариант № 1
program z1;
var
m:array[1. . 100] of real;
n, c: integer;
p:real;
begin n:=15;
for c: =1 to n do
begin m[c]:=random(6);
write(m[c]:4);
end;
writeln;
p:=1;
for c:=1 to n do
if m[c]<>0 then p:=p*m[c];
writeln(р);
end.
Вариант № 2
program z2 ;
var b: array[1..50] of real;
k,i:integer;
c:real;
begin
k:=12;
for i: =1 to k do
begin b[i]:=random(21)-10;
write(b[i]:4);
end;
writeln;
c:=0;
for i:=1 to k do
if (b[i]>0) and (i mod 2 =0) then
c:=c+b[i];
writeln(c);
end.
Вариант № 3
program z3;
var
c:array[1. . 20] of integer;
n, d, m, k: integer;
begin d:=17;
for k: =1 to d do
begin c[k]:=random(41)+15;
write(c[k]:4);
end;
writeln;
m:=c[1]; n:=1;
for k:=2 to d do
if c[k]>m then
m:=c[k];
writeln(m);
end.
Вариант № 4
program z4;
var
c:array[1. . 40] of integer;
n, d, m, j: integer;
begin j:=17;
for d: =1 to j do
begin c[d]:=random(61)+20;
write(c[d]:4);
end;
writeln;
m:=c[1]; n:=1;
for d:=2 to j do
if c[d]< m then
n:= d;
writeln(n);
end.
Вариант № 5
program z5;
var
m:array[1. . 80] of real;
n, c, p: integer;
begin n:=7;
for c: =1 to n do
begin m[c]:=random(31)-20;
write(m[c]:4);
end;
writeln;
p:=0;
for c:=1 to n do
if m[c]<0 then p:=p+1;
writeln(р);
end.
Вариант № 6
program z6 ;
var b: array[1..10] of real;
k,i,c:integer;
begin
k:=8;
for i: =1 to k do
begin b[i]:=random(61)-30;
write(b[i]:4);
end;
writeln;
c:=0;
for i:=1 to k do
if (b[i] mod 2=0) and (i mod 2 =0)
then
c:=c+1;
writeln(c);
end.
Вариант № 7
program z7;
var
c:array[1. . 20] of integer;
d, m, k: integer;
begin d:=17;
for k: =1 to d do
begin c[k]:=random(41)-15;
write(c[k]:4);
end;
writeln;
m:= 0;
for k:=1 to d do
if c[k] mod 5=0 then
m:=m+c[k];
writeln(m);
end.
Вариант № 8
program z8;
var
c:array[1. . 20] of integer;
n, d, m: integer;
begin m:=15;
for d: =1 to m do
begin c[d]:=random(21)-5;
write(c[d]:4);
end;
writeln;
n:=1;
for d:=1 to m do
if c[d] mod 2<>0 then
n:=n*c[d];
writeln(n);
end.
Цель работы: проверка усвоения основных понятий по теме «Одномерные массивы».
Вопросы:
Определить имя массива
Указать тип элементов массива.
Запишите максимальное возможное количество элементов в массиве.
Какой переменной обозначены индексы элементов массива.
Количество элементов в данном массиве.
Как обозначается текущий элемент массива.
Есть ли отрицательные элементы в данном массиве.
Запишите промежуток чисел, из которого выбираются элементы массива случайным образом.
Определить тип переменной, в которой сохраняется результат.
Что вычисляет данная программа.
Критерии оценивания:
«3» - 6-7 верных ответов
«4» - 8-9 верных ответов
«5» - 10 верных ответов
Учащимся раздаются индивидуальные карточки с программой и вопросы (можно вывести на экран). Предварительно для самоподготовки выдан через Дневник.ру тренажер http://learningapps.org/display?v=p10058qta01.
Ответы
Номер вопроса варианты
1 2 3 4 5 6 7 8
1 m b c c m d c c
2 вещ вещ цел цел вещ вещ цел цел
3 100 50 20 40 80 10 20 20
4 c ik d c ik d
5 15 12 17 17 7 8 17 15
6 M[c] B[i] C[k] C[d] M[c] B[i] C[k] C[d]
7 нет естьнет нет есть есть есть есть
8 [0;5] [-10;10] [15;55] [20;80] [-20;10] [-30;30] [-15;25] [-5;15]
9 вещ вещ цел цел цел цел цел цел
10 Произведение элементов <>0 Сумма положительных элементов с четными номерами Максимальный элемент Номер минимального элемента Количество отрицательных элементов Количнство четных элементов с четными номерами Сумма элементов кратные 5 Произведение нечетных элементов