Найти сумму модулей элементов массива, расположенных после первого элемента, равного нулю

@ReD_LIS · Регистрация: 14.11.2009

Author24 — интернет-сервис помощи студентам

В одномерном массиве, состоящем из N целочисленных элементов, вычислить: 1.Сумму модулей элементов массива, расположенных после первого элемента, равного нулю.
2.Преобразовать массив таким образом, чтобы в первой его половине располагались элементы, стоявшие в четных позициях, а во второй половине — элементы, стоявшие в нечетных позициях.
Помогите пожалста))

@yanyk1n · 23.02.2010, 17:40

2)

Pascal

uses crt;
var m,m1:array[1..100]of integer;
i,j,n,k:integer;
 
begin
 clrscr;
 randomize;
 write('N-> ');
 readln(n);
 writeln('Исходный массив');
 for i:=1 to n do
 begin
  m[i]:=-50+random(150);
  write(m[i],' ');
 end;
 
 k:=0;
 for i:=1 to n do if i mod 2=0 then
 begin
  inc(k);
  m1[k]:=m[i];
 end;
 for i:=1 to n do if i mod 2=1 then
 begin
  inc(k);
  m1[k]:=m[i];
 end;
 writeln('Отсортированный массив: ');
 for i:=1 to n do write(m1[i],' ');
 readln;
end.

Добавлено через 4 минуты
1)

Pascal

uses crt;
const n=10;
var m:array[1..n]of integer;
i,k,s:integer;
 
begin
 clrscr;
 write('Введите массив ->');
 for i:=1 to n do read(m[i]);
 readln;
 k:=1;
 while (k<=n) and (m[k]<>0) do inc(k);
 if k>n then writeln('В массиве нет нулей!') else
 begin
  s:=0;
  for i:=k+1 to n do s:=s+abs(m[i]);
  writeln('Сумма модулей = ',s);
 end;
 readln;
end.

@Nevill · 02.06.2010, 13:23

Допишите пожалуйста еще вот это задание к этой проге

@Puporev · 02.06.2010, 13:25

Сообщение от Nevill

еще вот это задание к этой проге

Дописал тем же цветом, что и задание...

@ReD_LIS 0 / 0 / 0 Регистрация: 14.11.2009 Сообщений: 31
		1
	Найти сумму модулей элементов массива, расположенных после первого элемента, равного нулю 23.02.2010, 17:25. Показов 1426. Ответов 3 Метки нет (Все метки) В одномерном массиве, состоящем из N целочисленных элементов, вычислить: 1.Сумму модулей элементов массива, расположенных после первого элемента, равного нулю. 2.Преобразовать массив таким образом, чтобы в первой его половине располагались элементы, стоявшие в четных позициях, а во второй половине — элементы, стоявшие в нечетных позициях. Помогите пожалста)) 0

@Nevill 0 / 0 / 0 Регистрация: 01.06.2010 Сообщений: 12
	02.06.2010, 13:23	3
	Допишите пожалуйста еще вот это задание к этой проге 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	02.06.2010, 13:25	4
	Сообщение от Nevill еще вот это задание к этой проге Дописал тем же цветом, что и задание... 0

Найти сумму модулей элементов массива, расположенных после первого элемента, равного нулю

Решение