Вопрос по информатике:
В массиве ненулевых целых чисел определить сколько раз элементы массива при просмотре от его начала меняют знак. Например, в массиве 10, -4, 12, 56, -4, -89 знак меняется 3 раза. Реализовать ввод размерности и возможность инициализации элементов массива.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 08.08.2016 15:39
- Информатика
- remove_red_eye 3179
- thumb_up 19
Ответы и объяснения 2
begin
var a: array of integer;
setLength (a, readinteger('Введите размерность массива: '));
var count:=0;
for var i:=0 to length(a)-1 do a[i]:=readinteger ('Введите элемент: ');
for var i:=1 to length(a)-1 do if (a[i-1]*a[i])<0 then count+=1;
write ('Кол-во раз: ', count);
end.
- 09.08.2016 10:00
- thumb_up 4
type z = array of integer;
var a: z;
i,n,k: longint;
begin
writeln('введите кол-во элементов в массиве: ');
readln(n);
setlength(a,n);
writeln('введите массив:');
for i:=0 to n-1 do readln(a[i]);
k:=0;
for i:=1 to n-1 do
if a[i]*a[i-1]<0 then k:=k+1;
writeln('количество ',k);
end.
- 01.01.1970 00:00
- thumb_up 19
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.