Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/8: Рейтинг темы: голосов - 8, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 13.01.2013
Сообщений: 6
1

Составить программу для нахождения первого отрицательного элемента массива, имеющего четный номер

21.01.2013, 19:57. Просмотров 1673. Ответов 2
Метки нет (Все метки)


составить программу для нахождения первого отрицательного элемента массива, имеющего четный номер
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.01.2013, 19:57
Ответы с готовыми решениями:

Составить программу для удаления из массива первого отрицательного элемента
Составить программу для удаления из массива первого отрицательного элемента. Массив заполнить...

Составить процедуру нахождения первого отрицательного элемента массива
составить процедуру нахождения первого отрицательного элемента массива.ввод оформить виде процедуры

Написать программу нахождения первого отрицательного элемента одномерного числового массива
пропустил тему не могу сообразить... есле кто то может написать программу, помогите! Буду...

Найти и вывести на печать номер и элементы столбца имеющего наименьшее количество элементов до первого отрицательного элемента
Помогите решить задачу: Найти и вывести на печать номер и элементы столбца имеющего наименьшее...

2
3020 / 1908 / 1647
Регистрация: 30.04.2011
Сообщений: 3,054
21.01.2013, 20:09 2
Лучший ответ Сообщение было отмечено кот25 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Var
  x: Array[1..100] of Integer;
  i,n,otr,t: Integer;
BEGIN
Randomize;
Write('Введите кол-во элементов массива: ');
Readln(n);
Writeln('Массив;');
For i:=1 to n do
begin
  x[i]:=Random(51)-25;
  Write(x[i],' ');
end;
For i:=n downto 1 do
If (i mod 2=0) and (x[i]<0) Then
begin
  Inc(t);
  otr:=x[i];
end;
Writeln;
If t=0 Then Writeln('Нету такого элемента')
Else
Writeln('1 отр. эл-т с четным номером: ',otr);
Readln
END.
0
491 / 371 / 208
Регистрация: 28.07.2011
Сообщений: 2,091
21.01.2013, 22:32 3
можно было через брейк, чтобы лишний раз массив не перебирать
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.01.2013, 22:32

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Составить программу для нахождения первого отрицательного числа
Дана последовательность из 15 чисел. Составить программу для нахождения первого отрицательного...

Составить программу для нахождения первого элемента массива меньше десяти и его номера
3)Известен целочисленный массив x1,х2,х3,…,х10. Составить программу для нахождения первого элемента...

Для каждой строки ступенчатого массива найти номер первого отрицательного элемента
Дан массив размером n×n, элементы которого целые числа.Для каждой строки найти номер первого...

Составить программу нахождения максимального отрицательного элемента матрицы и нахождения его местоположения
Дана вещественная матрица A(N,M). Составить программу нахождения максимального отрицательного...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.