Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
spbkiu
0 / 0 / 0
Регистрация: 24.03.2012
Сообщений: 8
#1

Найти первый нечетный элемент массива - Turbo Pascal

31.03.2012, 09:36. Просмотров 712. Ответов 2
Метки нет (Все метки)

Заполнить двумерный числовой массив С[5, 4] целыми числами. Найти первый нечетный элемент массива и номер строки и столбца, где он находится. Затем поменять местами первый нечетный и максимальный элемент массива.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.03.2012, 09:36
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Найти первый нечетный элемент массива (Turbo Pascal):

Удалить первый четный и первый нечетный элемент до первого отрицательного элемента массива - Turbo Pascal
Помогите, пожалуйста! Дан одномерный массив. Удалить первый четный и первый нечетный элемент до первого отрицательного элемента.

Утроить первый нечетный элемент в двумерном массиве - Turbo Pascal
напишите подпрограмму, которая утраивает первый нечетный элемент в двумерном массиве. примените эту подпрограмму к двум двумерным массивам

Матрица. Определить первый нечетный элемент и его номер - Turbo Pascal
дан двумерный массив размером n*m ,заполненный случайными числами.сформировать и вывести новый одномерный массив из : всех отрицательных...

Eдалить строку матрицы, в которой находится первый нечетный отрицательный элемент - Turbo Pascal
Дан двумерный массив, удалить строку в котором находится первый нечетный отрицательный элемент. Как ее решить?

Найти минимальный элемент в массиве. Вставить после минимального элемента первый элемент этого массива. - Turbo Pascal
Дан массив целых чисел. Найти минимальный элемент в массиве. Вставить после минимального элемента первый элемент этого массива. Нужно...

Найти первый отрицательный элемент массива - Turbo Pascal
А) Первый отрицательный элемент (принять, что отрицательные элементы есть в каждой строчке) Б) Последний четный элемент (принять, что...

2
BumerangSP
4287 / 1409 / 121
Регистрация: 16.12.2010
Сообщений: 2,941
Записей в блоге: 3
31.03.2012, 09:56 #2
Это чуть ли не самые встречающиеся темы в этом разделе, пользуйтесь поиском. Если есть конкретные вопросы, пишите сюда.
0
alex_RsB
3 / 3 / 1
Регистрация: 22.09.2009
Сообщений: 89
31.03.2012, 10:19 #3
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Цитата Сообщение от spbkiu Посмотреть сообщение
Заполнить двумерный числовой массив С[5, 4] целыми числами. Найти первый нечетный элемент массива и номер строки и столбца, где он находится. Затем поменять местами первый нечетный и максимальный элемент массива.
Ввод и вывод уже сам:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Program mas;
var c:array [1..4,1..5] of integer;
     i,j,buf,i1,i2,j1,j2,max:integer;
begin
//ввод данных
for i:=1 to 4 do
     for j:=1 to 5 do 
          if c[i,j]<0 then begin
              i1:=i;
              j1:=j;
         end;
max=c[1,1];
for i:=1 to 4 do
    for i:=1 to 5 do
        if c[i,j]>max then begin
               i2:=i;
               j2:=j;
               end;
buf:=c[i1,j1];
c[i1,j1]:=c[i2,j2];
c[i2,j2]:=buf;
//вивод
end;
Должно бы работать...
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.03.2012, 10:19
Привет! Вот еще темы с ответами:

Найти первый максимальный элемент массива и заменить его 0 - Turbo Pascal
помогите решить задачу пожалуйста!

Каждому четному элементу массива присвоить значение в 2 раза меньше него, каждый нечетный элемент массива уменьшить на 10. - Turbo Pascal
Прошу помочь,написать программу. Условие: Дан массив А(30). Каждому четному элементу массива присвоить значение в 2 раза меньше него,...

Найти первый максимальный элемент массива и заменить его нулем - Turbo Pascal
Дан массив действительных чисел. Среди них есть равные. Найти его первый максимальный элемент и заменить его нулем буду очень...

Найти наименьший нечетный элемент - Turbo Pascal
Найти наименьший нечетный элемент. Размер произвольный.


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

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

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