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

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

Вариант 1

1. Определите имя массива
2. Укажите тип элементов массива.
3. Запишите максимальное возможное количество элементов в массиве.
4. Какой переменной обозначены индексы элементов массива.
5. Запишите количество элементов в данном массиве.
6. Как  обозначается текущий элемент массива.
7. Запишите промежуток чисел, из которого выбираются  элементы массива случайным образом.
8. Определите тип переменной, в которой сохраняется результат.
9. Что вычисляет данная программа.

program z3;

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(26)-15;

    writeln (m[c]);

    end;

  p:=1;

  for c:=1 to n do

  if m[c]<>0 then p:=p*m[c];

  writeln (р);

end.

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

Вариант 2

1. Определите имя массива
2. Укажите тип элементов массива.
3. Запишите максимальное возможное количество элементов в массиве.
4. Какой переменной обозначены индексы элементов массива.
5. Запишите количество элементов в данном массиве.
6. Как  обозначается текущий элемент массива.
7. Запишите промежуток чисел, из которого выбираются  элементы массива случайным образом.
8. Определите тип переменной, в которой сохраняется результат.
9. Что вычисляет данная программа.

program z4;

var  b: array[1..50] of real;

    k, y:integer;   c:real;

begin

  k:=12;

  for y: =1 to k do

     begin

     b[y]:=random(21)-10;

     writeln (b[y]);

    end;

   c:=0;

   for y:=1 to k do

   if b[y]>0 then  c:=c+b[y];

   writeln (c);

end.

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

Вариант 3

1. Определите имя массива
2. Укажите тип элементов массива.
3. Запишите максимальное возможное количество элементов в массиве.
4. Какой переменной обозначены индексы элементов массива.
5. Запишите количество элементов в данном массиве.
6. Как  обозначается текущий элемент массива.
7. Запишите промежуток чисел, из которого выбираются  элементы массива случайным образом.
8. Определите тип переменной, в которой сохраняется результат.
9. Что вычисляет данная программа.

program z1;

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;

    writeln (c[k]);

    end;

  m:=c[1];

  for k:=2 to d do

  if c[k]>m then  m:=c[k];   

  writeln (m);

end.

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

Вариант 4

1. Определите имя массива
2. Укажите тип элементов массива.
3. Запишите максимальное возможное количество элементов в массиве.
4. Какой переменной обозначены индексы элементов массива.
5. Запишите количество элементов в данном массиве.
6. Как  обозначается текущий элемент массива.
7. Запишите промежуток чисел, из которого выбираются  элементы массива случайным образом.
8. Определите тип переменной, в которой сохраняется результат.
9. Что вычисляет данная программа.

program z2;

var  f:array[1. . 80] of real;

         n, a, p: integer;

begin

  n:=7;

  for a: =1 to n do

    begin

    f[a]:=random(31)-20;

    writeln (f[a]);

    end;

  p:=0;

  for a:=1 to n do

  if f[a]<0 then p:=p+1;

  writeln (р);

end.