Есть ответ 👍

Определитель, сколько элементов массива а равны 1

112
137
Посмотреть ответы 2

Ответы на вопрос:


Var n,i,k: integer; a: array [1..10] of integer; begin for i: =1 to 10 do begin read (a[i]);   if a[i]=1 then n: =n+1;   end;   writeln ('edinice=',n,' elements'); end.
stif432
4,5(25 оценок)

Монитор, принтер, клавиатуру, флаш память,колонки

Популярно: Информатика