В МАССИВЕ Отыскать КОЛИЧЕСТВО НУЛЕВЫХ Частей 9 КЛАСС СРОЧНО!!!

В МАССИВЕ Отыскать КОЛИЧЕСТВО НУЛЕВЫХ ЭЛЕМЕНТОВ 9 КЛАСС Безотлагательно!!!

Задать свой вопрос
1 ответ

Var

m: array [1..10000] of integer;

k,i:integer;

Begin

k:=0;

randomize;

For i:=1 to 10 do

read(m[i]);

For i:=1 to 10 do

If m[i]=0 then k:=k+1;

Writeln(k);

end.

Stepka Danko
это прям точно?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт