Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Удалить первый отрицательный элемент одномерного массива, если такой элемент есть.

10-11 класс

Nes5 04 мая 2014 г., 5:31:22 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Nikiiii
04 мая 2014 г., 7:51:10 (10 лет назад)

program enot;
VAR   a: array [1..5] of integer;
  i,b: integer;
  begin
  for i:= 1 to 5 do
  a[i]:= random(51)-25; 
 for i:= 1 to 5 do
  write(a[i],' '); 
 writeln();
  for i:= 1 to 5 do
  if a[i]<0 then 
 begin b:=a[i];
  break
  end;
  for i:= 1 to 5 do
  if a[i]<>b
 then
write(' ', a[i]); 
 end.

Ответить

Другие вопросы из категории

Помогите , пожалуйста !!!

Растровый графический файл содержит черно-белое изображение ( без градации серого ) размером 400 на 250 точек . Каков информационный объем этого файла ? ( в Кб)

Напишите оператор присваивания, в результате выполнения которого целой переменной н присвоится значение цифры, стоящей в разряде сотен в записи

положительного целого числа к ( например, если к= 28796, то н= 7).
p.s язык Паскаль:)

Читайте также

Паскаль. 12.Дан массив А(3*4). Найти сумму первых отрицательных элементов в каждом столбце. 13.Даны два массива А(3*3)

и В(3*3). Вывести на экран тот из них, у которого меньше сумма элементов главной диагонали.

17.Дан массив А(3*4). Заменить все отрицательные элементы на противоположные.

С.Р.О.Ч.Н.О. Составить процедуру, вичисляющую значение TRUE, если в первом из двух заданных одномерных массивов количество

отрицательных элементов окажется больше, чем во втором, и значение FALSE в противном случае. Использовать такую процедуру для массивов: R = (0; 0.005; -0.02; -87.5; 50) W = (45; 721.5; 8.63; -76.97; 3)

C.Р.О.Ч.Н.О.

1. Заполнить массив с клавиатуры целыми числами. Вывести элементы этого массива на экран. (Добавить комментарии) 2. Заполнить массив таким образом, чтобы

каждый его элемент был равен утроенному значению его порядкового номера (индекса). 3. Ввести массив с клавиатуры, найти и вывести сумму элементов массива. 4. Ввести массив с клавиатуры, подсчитать, сколько в нем положительных элементов, а сколько отрицательных. 5. В одномерном массиве подсчитать, сколько отрицательных элементов находится на четных местах и сколько положительных на нечетных. 6. Элементы массива вводятся с клавиатуры, заменить в нем все отрицательные элементы их квадратами, а положительные кубами. Вывести на экран исходный и новый массив. 7. Ввести массив с клавиатуры, найти и вывести на экран максимальный и минимальный элементы. 8. Написать программу, которая определяет есть ли в массиве элемент введенный пользователем, подсчитывает их количество и выводит номер первого найденного элемента.

Одномерные массивы. 3 задачки))

1) Из элементов данного массива W[1..20] создать 2 новых массива, первый из которых содержит только положительные элементы, а второй только отрицательные.

2) Заполнить СЛУЧАЙНЫМИ числами в диапазоне от 1 до 10 два массива A[20] и B[20]. Найти и вывести на экран только те элементы этих массивов и их номера, значения которых попарно совпадают.
Например, если A[2]=B[2]=4, то на экран надо вывести: Номер-2, значение-4.
3) Заменить найденный минимальный элемент числом 100 и показать на экране массив с этой заменой.



Вы находитесь на странице вопроса "Удалить первый отрицательный элемент одномерного массива, если такой элемент есть.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.