Вычислить сумму индексов нулевых элементов одномерного массива

@ilyagerasimov · Регистрация: 08.11.2012

Помогите решить)
Вычислить сумму индексов нулевых элементов одномерного массива X(n) .

@antisportik228 · 18.11.2012, 14:18

Pascal

type t=array[1..100] of integer;
var x:t; s,i,n:integer;
  begin
   write('введите колличество элементов массива');
     read(n);
   write('введите массив');
     for i:=1 to n do
       read(x[i]);
       s:=0;
     for i:=1 to n do
       if x[i] = 0 then s:=s+i;  
       
       write(s);
       
       
       end.

@ilyagerasimov 0 / 0 / 0 Регистрация: 08.11.2012 Сообщений: 9
		1
	Вычислить сумму индексов нулевых элементов одномерного массива 18.11.2012, 12:31. Просмотров 1516. Ответов 1 Метки нет (Все метки) Помогите решить) Вычислить сумму индексов нулевых элементов одномерного массива X(n) . 0

Опции темы

Вычислить сумму индексов нулевых элементов одномерного массива

Решение