Заполнить массив 10-ю случайными целыми числами - вопрос №1102554010518 от vasipovismail 11.02.2021 12:34

Question

Информатика: Заполнить массив 10-ю случайными целыми числами из промежутка [5; 18] и вывести на экран каждый третий элемент.

vasipovismail · Answer

user crt;vara:array{1 .. 10} of integer;1: byte;randomze;begin for i:=1 to 10 do begin   a{i}:=random(18)+5;  if (i mod 3=0) then write (a[i], );end;end.Объяснение:...