Question

1.Вставьте пропущенные слова в описании массива А, элементами которого являются целые числа. А: _________________[1..100] of ______________.2. Опишите массив для хранения зарплаты за каждый месяц. Зарплату считать целым числом.3.Опишите: a)Переменную В для массива, состоящую из 8 символов. b)Переменную MAS для массива, состоящего из 100 вещественных чисел. c)Переменную DAY для массива, состоящего из 30 целых чисел, причем номер первого элемента массива должен быть равен 5.4. Пусть А : array [1..10] of integer. Напишите операторы, соответствующие следующим действиям: a. Третий элемент массива сделать равным 5. b. Вывести на экран 7-й элемент массива. c. Ввести значение 1-го элемента массива. d. Вычислить сумму 1,2 и 3-го элементов массива.5. Пусть А : array [1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Вычислить сумму всех элементов массива (используйте цикл).6. Пусть C : array [1..10] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Вывести на экран все элементы массива.7. Пусть А : array [1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Поменять местами первый и последний элементы массива.8. Пусть В : array [1..20] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Заполнить массив случайными числами из интервала [-24;37].

Answer 1

A : array [1..100] of integer;

z : array [1..12] of integer;

var
  B : array [1..8] of char;
  MAS : array [1..100] of real;
  DAY : array [5..34] of integer;

a[3] := 5;
write (a[7]);
read (a[1]);
sum := a[1] + a[2] + a[3];

for i := 1 to 15 do
  sum := sum + a[i];

for i := 1 to 10 do
  write (c[i]);

tmp := a[1];
a[1] := a[15];
a[15] := tmp;

for i := 1 to 20 do
  b[i] := random (62) - 24;

Answer 2

Ответ:

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

2. Опишите массив для хранения зарплаты за каждый месяц. Зарплату считать целым числом. salary: array[1..12] of integer.

3. Опишите: - a) Переменную B для массива, состоящую из 8 символов. B: array[1..8] of char. - b) Переменную MAS для массива, состоящего из 100 вещественных чисел. MAS: array[1..100] of real. - c) Переменную DAY для массива, состоящего из 30 целых чисел, причем номер первого элемента массива должен быть равен 5. DAY: array[5..34] of integer.

4. Пусть А: array[1..10] of integer. Напишите операторы, соответствующие следующим действиям: - a. Третий элемент массива сделать равным 5. A[3] := 5. - b. Вывести на экран 7-й элемент массива. writeln(A[7]). - c. Ввести значение 1-го элемента массива. readln(A[1]). - d. Вычислить сумму 1, 2 и 3-го элементов массива. sum := A[1] + A[2] + A[3].

5. Пусть А: array[1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: - Вычислить сумму всех элементов массива (используйте цикл). sum := 0; for i := 1 to 15 do sum := sum + A[i]; writeln(sum).

6. Пусть C: array[1..10] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: - Вывести на экран все элементы массива. for i := 1 to 10 do writeln(C[i]).

7. Пусть A: array[1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: - Поменять местами первый и последний элементы массива. temp := A[1]; A[1] := A[15]; A[15] := temp.

8. Пусть B: array[1..20] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: - Заполнить массив случайными числами из интервала [-24;37]. for i := 1 to 20 do B[i] := random(62) - 24.