Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal ABC Динамические структуры данных https://www.cyberforum.ru/ pascalabc/ thread812643.html
Разработайте программу работы со стеком. Программа должна содержать следующие процедуры, вызываемые из меню: - построение пустого стека; - добавление элемента; - удаление элемента; - уничтожение стека. 		Преобразовать в строке все строчные буквы в прописные Pascal ABC
Дана строка. Преобразовать в ней все строчные буквы (как латин¬ские, так и русские) в прописные. program aasdasd; var s:string; i:integer; begin write ('s:');readln(s); for i:=1 to length(s)do begin
Pascal ABC Задан файл F, все компоненты которого – целые числа. Переписать в файл G компоненты файла F, упорядоченные по убыванию. G – текстовый файл https://www.cyberforum.ru/ pascalabc/ thread812611.html
Задан файл F, все компоненты которого – целые числа. Переписать в файл G компоненты файла F, упорядоченные по убыванию. G – текстовый файл. 		Pascal ABC Сформировать двумерный массив L Сформировать двумерный массив L размером 3 x 10 с помощью генератора случайных чисел и вывести элементы массива на экран и в файл. Вывести на экран и в файл номер строки и саму строку матрицы L, в которой сумма положительных элементов максимальна (оформить нахождение сумм положительных элементов в виде процедуры). https://www.cyberforum.ru/ pascalabc/ thread812610.html
Даны два текстовых файла одинакового размера, элементами которых являются отдельные буквы. Получить третий файл, каждый элемент которого представляет Pascal ABC
Даны два текстовых файла одинакового размера, элементами которых являются отдельные буквы. Получить третий файл, каждый элемент которого представляет собой сочетание соответствующих букв первого и второго файлов. 		Pascal ABC Файл: Записать в файл G компоненты файла F в обратном порядке, причем в начало G поместить все нечетные, а затем все четные компоненты. Дан символьный файл F. Записать в файл G компоненты файла F в обратном порядке, причем в начало G поместить все нечетные, а затем все четные компоненты. https://www.cyberforum.ru/ pascalabc/ thread812608.html
Pascal ABC Дан текст на английском языке, который заканчивается точкой. В тексте удалить все гласные буквы, а согласные заменить на прописные https://www.cyberforum.ru/ pascalabc/ thread812607.html
Дан текст на английском языке, который заканчивается точкой. В тексте удалить все гласные буквы, а согласные заменить на прописные. 		Pascal ABC Ввести файл целых чисел. Все компоненты файла, расположенные после минимальной, переписать в массив (если это возможно). В Массиве найти с
Ввести файл целых чисел. Все компоненты файла, расположенные после минимальной, переписать в массив (если это возможно). В Массиве найти сумму отрицательных значений и заменить ею первую компоненту файла. Файл и массив распечатать.
Pascal ABC Дано натуральное число N. Вычислить (cos1/sin1)*((cos1+cos2)/(sin1+sin2))*...*((cos1+cos2+...+cosN)/(sin1+sin2+...+sinN)) https://www.cyberforum.ru/ pascalabc/ thread812584.html Pascal ABC составить алгоритм для вычисления функции составить алгоритм для вычисления функции 2x+1,если х больше нуля y= cosХ,если х меньше 0 P.S. функция соединена фигурной скобкой...Очень нужна ваша помощь! https://www.cyberforum.ru/ pascalabc/ thread812548.html
Составить алгоритм-вычисление квадрата суммы двух чисел и алгоритм для вычисления функции Pascal ABC
Здравствуйте!Мне нужно все с самого начала и точно,помогите пожалуйста! 1.составить алгоритм-вычисление квадрата суммы двух чисел. 		Pascal ABC Подсчитайте наибольшее количество идущих подряд букв кириллицы. https://www.cyberforum.ru/ pascalabc/ thread812531.html
Помогите написать программу: Дана строка символов. Подсчитайте наибольшее количество идущих подряд букв кириллицы. Заранее спасибо.
Фрилансер
3418 / 2815 / 3000
Регистрация: 08.02.2012
Сообщений: 8,587
Записей в блоге: 1
20.03.2013, 12:40 0

В массиве найти максимальный элемент в первой половине и максимальный элемент во второй - Pascal ABC - Ответ 4281542

20.03.2013, 12:40. Показов 4667. Ответов 2
Метки (Все метки)
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

Var X:array[1..100] of integer;
    i,n,max1,max2:byte;
Begin
    write('N = ');readln(n);
    For i:=1 to n do
    Begin
      X[i]:=random(31)-15;
      write(X[i]:4);
    End;
    writeln;
    max1:=1;
    For i:=2 to n div 2 do
     if X[i]>X[max1] then max1:=i;
    max2:=n div 2+1;
    For i:=n div 2+2 to n do
     if X[i]>X[max2] then max2:=i;
    writeln('Max1  = ',X[max1]);
    writeln('Max2  = ',X[max2]);
    readln;
End.


Вернуться к обсуждению:
В массиве найти максимальный элемент в первой половине и максимальный элемент во второй Pascal ABC
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 20.03.2013, 12:40
Готовые ответы и решения:

В первой половине массива найти максимальный элемент, во второй половине минимальный
Дан одномерный массив размером N. Заполнить массив случайными элементами. В первой половине массива...

Найти максимальный элемент в первой половине массива и минимальный - во второй половине массива
Здравствуйте, помогите пожалуйста сделать программу. Задание: Дан массив А размерностью k. Найти...

В массиве найти в первой половине массива наибольший,а во второй половине-наименьший элемент и поменять их местами
В произвольном массиве A,состоящем из 60 целых чисел,принадлежащих промежутку ,найти в первой...

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

2
20.03.2013, 12:40
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 20.03.2013, 12:40
Помогаю со студенческими работами здесь

В целочисленном массиве M(n) найти максимальный элемент среди четных элементов массива и максимальный элемент
В целочисленном массиве M(n) найти максимальный элемент среди четных элементов массива и...

Проверить, расположен ли максимальный нечетный элемент в первой половине массива
Дан одномерный массив А неупорядоченных целых чисел, состоящий из 2N элементов. Если максимум среди...

Найти второй максимальный элемент в массиве
Здравствуйте! Подскажите, пожалуйста, как найти второй максимальный элемент в массиве? ...

В отсортированном массиве найти второй максимальный по величине элемент
Задан массив AX (N). Добавить массив С(К). Выполнить сортировку включением. В полученном массиве...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru