Две массив P из 17 элементов. Найти количество пятёрок в массиве.
Две массив P из 17 элементов. Найти количество пятёрок в массиве.
Гость
Ответ(ы) на вопрос:
Гостьconst n=17;
var a:array[1..n] of integer;
k,i:integer;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
k:=0;
for i:=1 to n do
if a[i]=5 then k:=k+1;
writeln('k = ',k);
end.
Пример:
Массив A:
13 0 5 4 16 2 5 7 13 0 16 6 2 8 6 11 13
k = 2
Не нашли ответ?
Похожие вопросы