Заполнить массив 10-ю случайными целыми числами - вопрос №1051811025038 от dimasergeenko 16.03.2021 06:59

Question

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

dimasergeenko · 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.Объяснение:...