Предмет: Информатика,
автор: kotelevskaadd
дан целочисленный массив состоящий из 12 элементов и заполненный случайными числами (-15;15). Найдите количество элементов кратных 5
Ответы
Автор ответа:
0
===== PascalABC.NET =====
begin
var a := ArrRandom(12, -15, 15);
a.Println.Count(p -> p mod 5 = 0).Print
end.
Приложения:
то самое чувство когда вообще ничего не понимаешь
Похожие вопросы
Предмет: Математика,
автор: veronikapt018
Предмет: Математика,
автор: elvirajavorska
Предмет: Математика,
автор: emiliaignatenko
Предмет: Математика,
автор: lily280984
Предмет: Обществознание,
автор: nikita13372333335e54
var a,s:integer;
q:array[0..12] of integer;
begin
for a:=1 to 12 do begin
q[a]:=random(30)-15;
writeln(q[a]);
end;
for a:=1 to 12 do begin
if(q[a] mod 5 =0) then
s:=s+1;
end;
writeln('qe',s);
end.