Question

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;