Задание 2 Вариант 2 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Ниже вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:

2. Напишите программу. Заполните массив В[1..2О] случайными целыми числами, принадлежащими промежутку [0; 80] и выведите его на печать.

По результатам выполнения программы заполните таблицу:

В[1] = В[6] = В[11] = В[16] =

В[2] = В[7] = В[12]= В[17] =

В[3] = В[8] = В[13] = В[18]=

В[4] = В[9] = В[14] = В[19] =

В[5] = В[10]= В[15]= В[20] =

program s4_v2_2;

var

b: array[1..20] of integer;

i: integer;

begin

writeln(taskввод массиваtask);

randomize;

for i := 1 to 20 do

begin

b[i] := random(81);

writeln(taskb[task, i, task]=task, b[i])

end;

end.