Самостоятельная работа по теме «Массивы» 9 класс. массив. Самостоятельная работа по теме Массивы

• Название: Самостоятельная работа по теме Массивы
• Анкор: Самостоятельная работа по теме «Массивы» 9 класс
• Дата: 08.04.2023
• Размер: 17.18 Kb.
• Имя файла: массив.docx
• Тип: Самостоятельная работа; #1046733

Самостоятельная работа по теме «Массивы»

1 вар

1. 
   В программе используется одномерный числовой массив А с индексами от 0 до 9. Ниже представлен фрагмент программы, в котором значения элементов сначала задаются, а затем меняются:
   

for i:=0 to 9 do

a[i]:=i*5;

for i:=0 to 9 do

a[i]:=a[i] mod 5;

Какие элементы будут в массиве после выполнения фрагмента программы?

2. В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 8, 4, 3, 0, 7, 2, 1, 5, 9, 6 соответственно, т.е. A[0]=8, A[1]=4 и т.д. Определите значение переменной c после выполнения следующего фрагмента этой программы.

Паскаль

c := 0; for i := 0 to 8 do if A[i] > A[i+1] then begin c := c + 1; t := A[i]; A[i] := A[i+1]; A[i+1] := t; end;

3.  В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1] := 7; Dat[2] := 9;
Dat[3] := 10; Dat[4] := 5;
Dat[5] := 6; Dat[6] := 7;
Dat[7] := 9; Dat[8] := 8;
Dat[9] := 6; Dat[10] := 7;
m := 0;
for k := 1 to 10 do
if Dat[k] < 8 then begin
m := m + 1
end;
writeln(m)
End.


2 вар

1. В программе используется одномерный числовой массив А с индексами от 0 до 9. Ниже представлен фрагмент программы, в котором значения элементов сначала задаются, а затем меняются:

for i:=0 to 9 do

a[i]:=10-i;

for i:=0 to 4 do

a[i]:=a[i+5]

Какие элементы будут в массиве после выполнения фрагмента программы?

2. 
   В программе используется одномерный целочисленный массив A с индексами от 0 до 9. Значения элементов равны 7; 3; 4; 8; 6; 9; 5; 2; 0; 1 соответственно, т.е. A[0]=7; A[1]=3 и т. д. Определите значение переменной j после выполнения следующего фрагмента программы, записанного ниже на разных языках программирования.
   

Паскаль
j := 0; for k := 1 to 9 do begin if A[k] > A[1] then begin A[1] := A[k]; j := j + k end end;

3.  Школьница делала лабораторную работу по физике, в ходе которой измерила 10 раз силу тока и записала показания амперметра в таблицу Tok (Tok[1] – результат первого измерения, Tok[2] – второго и т. д.). Определите, какое
число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Tok: array[1..10] of integer;
Begin
Tok[1] := 10; Tok[2] := 14;
Tok[3] := 15; Tok[4] := 4;
Tok[5] := 12; Tok[6] := 6;
Tok[7] := 3; Tok[8] := 5;
Tok[9] := 5; Tok[10] := 10;
m := 0;
For k := 1 to 10 Do
If Tok[k] > 6 Then Begin
m := m + 2;
End;
Writeln(m);
End.