Меню
Разработки
Разработки  /  Информатика  /  Подготовка к ЕГЭ  /  10 класс  /  Проверочная работа по теме Массивы

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

Работа представляет собой бланк для внесения ответов по теме. Также в конце работы есть практическое задание.
09.04.2020

Содержимое разработки

Одномерные массивы

Фамилия, имя      

  1. Вставьте пропущенные слова в описании массива а, элементами которого являются целые числа.
    а:     [1..100] of      ;


  1. Опишите массив для хранения зарплаты за каждый месяц.
    Опишите
    а) переменную b для массива, состоящего из 8 символов.
         
    б) переменную mas для массива, состоящего из 100 вещественных чисел.
         
    в) переменную day для массива, состоящего из 30 целых чисел, причем номер первого элемента массива должен быть равен 5.
         
    Сколько байтов памяти занимают массивы:
    a: array[1..5] of integer; Ответ _______________
    b: array[3..10] of char; Ответ _______________
    c: array[1..100] of real; Ответ _______________

  2. Пусть a: array[1..10] of integer. Напишите операторы, соответствующие следующим действиям:
    Третий элемент массива сделать равным 5.Ответ:
         
    Вывести на экран 7-й элемент массива. Ответ:
         
    Вывести значение первого элемента массива. Ответ:
         

  3. Требуется найти и вывести на экран макс. эл-т в массиве из 10 чисел. Массив заполняется случайными числами. Определите правильный вариант программы.
    Ответ:      (указать букву ответа)

    a) var a:array [1..10] of integer;

    m,i: integer;

    Begin

    for i:=1 to 10 do

    a[i]:=random(100);

    for i:=2 to 10 do

    if m

    Writeln(m);

    end.

    b) var a:array [1..10] of integer;

    m,i: integer;

    Begin

    for i:=1 to 10 do

    a[i]:=random(100);

    m:=a[1];

    for i:=2 to 10 do

    if m

    Writeln(m);

    end.

    c) var a:array [1..10] of integer;

    m,i: integer;

    Begin

    for i:=1 to 10 do

    a[i]:=random(100);

    m:=a[1];

    for i:=2 to 10 do

    if m

    Writeln(a[i]);

    end.

    d) var a:array [1..10] of integer;

    m,i: integer;

    Begin

    for i:=1 to 10 do

    a[i]:=random(100);

    m:=a[1];

    for i:=2 to 10 do begin

    if m

    Writeln(m); end;

    end.

  4. Требуется найти и вывести на экран минимальный элемент и его номер в массиве из 10 чисел. Массив заполняется случайными числами. Определите правильный вариант программы.
    Ответ:       (указать букву ответа)


a) var

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

m,i,k: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

m:=a[1]; k:=1;

for i:=2 to 10 do

if m

begin

m:=a[i];

k:=i;

end;

writeln(m,' , ',k);

end.


b) var

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

m,i,k: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

m:=a[1];

begin

if ma[i] then

begin

m:=a[i];

k:=i;

end;

writeln(m,' , ',k);

end.

c) var

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

m,i,k: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

k:=1;

for i:=2 to 10 do

if a[i]

k:=i;

writeln(a[k],' , ',k);

end.


d) var

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

m,i: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

m:=a[1];

for i:=2 to 10 do

if m

m:=a[i];

writeln(m,' , ',a[i]);

end.


  1. Сформулируйте условие задачи для программы:

var a:array [1..100] of integer;

s,i,n: integer;

Begin

readln(n);

for i:=1 to n do a[i]:=sqr(i);

s:=0;

for i:=1 to n do s:=s+a[i];

writeln(s);

end.
Условие задачи:     


9. Требуется найти и вывести на экран сумму четных элементов массива из 10 чисел. Массив заполняется случайными числами. Определите правильный вариант программы.
Ответ:       (указать букву ответа)

a) var a:array [1..10] of integer;

s,i: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

s:=0;

for i:=1 to 10 do

s:=s+a[i];

writeln(s);

end.


b) var a:array [1..10] of integer;

s,i: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

s:=0;

for i:=1 to 10 do

if a[i] div 2 = 0 then

s:=s+a[i];

writeln(s);

end.

c) var a:array [1..10] of integer;

s,i: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

s:=0;

for i:=1 to 10 do

begin

if a[i] mod 2 = 0 then

s:=s+a[i];

writeln(s);

end;

end.

d) var a:array [1..10] of integer;

s,i: integer;

Begin

for i:=1 to 10 do

a[i]:=random(100);

s:=0;

for i:=1 to 10 do

if a[i] mod 2 = 0 then

s:=s+a[i];

writeln(s);

end.


10. Требуется элементы массива а переписать в массив в , удвоив все элементы, меньше первого элемента, остальные переписать без изменения.. Массив а заполняется случайными числами. Определите правильный вариант программы.
Ответ:       (указать букву ответа)

a) const n=10;

var a,b:array [1..10] of integer;

i: integer;

Begin

for i:=1 to n do

a[i]:=random(100);

for i:=1 to n do

if a[i]

end.


b) const n=10;

var a,b:array [1..10] of integer;

i: integer;

Begin

for i:=1 to n do

a[i]:=random(100);

for i:=1 to n do

if a[i]

b[i]:=a[i];

end.

c) const n=10;

var a,b:array [1..10] of integer;

i: integer;

Begin

for i:=1 to n do

a[i]:=random(100);

for i:=1 to n do

if a[i]

b[i]:=a[i]*2

else b[i]:=a[i];

end.


d) const n=10;

var a,b:array [1..10] of integer;

i: integer;

Begin

for i:=1 to n do

a[i]:=random(100);

if a[i]

for i:=1 to n do

b[i]:=a[i]*2

b[i]:=a[i];

end.






  1. П о блок схеме на рис. сформулируйте условие задачи, решаемой представленным алгоритмом. Восстановите стрелки.





















Условие задачи     

12. Значения массивов a и в заданы с помощью следующего фрагмента.

Сколько элементов массива b будут иметь положительные значения?


12а )…

for i:=1 to 100 do

a[i]:=I -10;

for i:= 1 to 100 do

b[i]:=a[i]*i;

…..


Ответ:     

12б) …

for i:=1 to 200 do

a[i]:=I+100;

for i:= 1 to 200 do

b[i]:=2*a[i]-500;

…..


Ответ:     

12в) …

for i:=1 to 300 do

a[i]:=100-i;

for i:= 1 to 300 do

b[i]:=2*a[i]+1;

…..


Ответ:     


Практическое задание. По блок-схеме задания 11 написать программу. Файл программы приложить к ответу.

4


-80%
Курсы профессиональной переподготовке

Учитель, преподаватель физики и информатики

Продолжительность 600 или 1000 часов
Документ: Диплом о профессиональной переподготовке
17800 руб.
от 3560 руб.
Подробнее
Скачать разработку
Сохранить у себя:
Проверочная работа по теме Массивы (52.5 KB)

Комментарии 0

Чтобы добавить комментарий зарегистрируйтесь или на сайт