Дан массив (Паскаль) из десяти целых чисел, подсчитать сколько встречается 0. Как это...

Question

Дан массив (Паскаль) из десяти целых чисел, подсчитать сколько встречается 0. Как это делается? помогите, пожалуйста.

Comments

те код нужен?

---

на паскале?

---

БИКШАК, да

---

лан, ща жахну

---

quick mafs, bruv

---

the ting go skrrra

Answer 1

Var 
a:array[1..10] of integer; 
i,k:byte; 
begin 
writeln('Заполнение массива'); 
for i:=1 to 10 do 
readln(a[i]); 
for i:=1 to 10 do 
begin 
if a[i]=0 then 
k:=k+1; 
end; 
writeln('Кол-во нулей:',k); 
end.

Comments

Ohmkay Ah boom. ლ(́◉◞◟◉‵ლ Спасибок