Составьте программу, которая формирует массив d из 14 случайных чисел, принадлежащих промежутку от -7 до 25 и заменяет числа, кратные 5ти на 0 ♡

Bmadjdraw Bmadjdraw    1   04.10.2019 09:50    3

Ответы
ЮраУтюг ЮраУтюг  09.10.2020 19:19

var

d:array [1..14] of integer;

a:integer;

begin

for a:=1 to 14 do begin

d[a]:=random(32)-7;

if d[a] mod 5=0 then d[a]:=0;

end;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика