1. Используя примеры 3.14—3.18, выполните следующие задания.

1.  Введите 5 чисел и выведите их в одной строке.

var a: array[1..5] of integer;
begin
  write('Введите 5 чисел: ');
  for var i := 1 to 5 do
    read(a[i]);
  for var i := 1 to 5 do
    write(a[i], ' ');
end.

2. Введите 7 чисел и выведите их в одной строке в обратном порядке.

var a: array[1..7] of integer;
begin
  write('Введите 7 чисел: ');
  for var i := 1 to 7 do
    read(a[i]);
  for var i := 1 to 7 do
    write(a[8-i], ' ');
end.

3. Задайте 10 случайных чисел и выведите их по одному в строке.

var a: array[1..10] of integer;
begin
  for var i := 1 to 10 do
    a[i] := random(101);
  for var i := 1 to 10 do
    writeln(a[11-i]);
end.

4. Выведите на экран элементы массива, заданного в примере 3.16.

По умолчанию индексы в массиве начинаются от нуля [0 ,1 , 2], поэтому элементы выводить будем от 0 до 2.

const c_rgb: array of string =
('красный','синий','зеленый');
begin
  for var i := 0 to 2 do
    write(c_rgb[i], ' ');
end.
Другие задания