Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Элементы главной диагонали матрицы Элементы главной диагонали расположить в обратном порядке. вроде не так трудно но 2 часа уже голову ломаю https://www.cyberforum.ru/ pascal/ thread191090.html Pascal Нахождение столбцов с одинаковым значением.
uses crt; const nmax=20; var a:array of real; n,i,j,k:byte; begin clrscr; randomize; repeat n:=3; until n in ;
Pascal Ежемесячные выплаты https://www.cyberforum.ru/ pascal/ thread191077.html
Используя сведения о ежемесячных выплатах зарплаты сотрудникам фирмы, выяснить, не оказалась ли годовая зарплата кого-либо из сотрудников ниже годового минимума, оговоренного в его контракте. N - количество сотрудников; А(N,12) - матрица сведений о ежемесячных выплатах зарплаты (элемент матрицы a соответствует зарплате i-го сотрудника за j-й месяц); B(N) - массив сведений об...
Pascal Составить блок-схему алгоритма и программу. Предусмотреть генерацию случайного целого числа в диапазоне от N до M. Выполнить задание двумя способами: N=3, M=10. Вывести на монитор название соответствующего времени суток. Если выпал день, то выяснить возможность построения треугольника из отрезков заданной длины. В случае существования такого треугольника определить является ли он прямоугольным. https://www.cyberforum.ru/ pascal/ thread191076.html
Pascal Не работает программа.
Вот программа на Паскале: PROGRAM p1; uses crt; var A:array OF INTEGER; C,I:CHAR; Z:INTEGER; BEGIN RANDOMIZE; CLRSCR;
Pascal a,b,c в порядке убывания.Pascal https://www.cyberforum.ru/ pascal/ thread191073.html
помогите пожалуйста=)
Pascal сравнение 2 строк https://www.cyberforum.ru/ pascal/ thread191043.html
type WRD=string; var x,y:WRD; eq:boolean; Считая , что в каждом из слов x и y нет повторяющихся литер ,присвоить переменнгой eq знвчение true , если слова x и y отличаються только порядком входящих в них литер ,и значение false в противном случае Добавлено через 1 час 14 минут помогите пожайлуста
Вывести подстроку Pascal
Дана строка. Вывести подстроку, расположенную между первой и второй точками исходной строки. Если в строке менее двух точек, то вывести всю исходную строку.
Pascal Модуль Graph Построить семейство разноцветных случайным образом вырезанных секторов окружностей. https://www.cyberforum.ru/ pascal/ thread191018.html Pascal Модуль CRT Нарисовать на экране несколько вложенных друг в друга разноцветных прямоугольников. https://www.cyberforum.ru/ pascal/ thread191016.html
Pascal Разработать подпрограмму, которая в заданной строке определяет наличие слов, которые повторяются два или более раза
Разработать подпрограмму, которая в заданной строке определяет наличие слов, которые повторяются два или более раза, и выводит на экран эти слова с указанием числа их повторений. В случае отсутствия таких слов выводится соответствующие сообщение. В основной программе проверить на наличие повторяющихся слов все строки текстового файла. Имя файла задается пользователем.
Pascal Дано несколько массивов чисел народ плиз помогите с такой задачей Дано несколько массивов чисел. Длины массивов заданы в варианте. Требуется в каждом массиве найти наибольший и наименьший элементы и напечатать их, затем все компоненты каждого массива возвести в квадрат и снова найти наибольший и наименьший элементы. Вычисление максимальной и минимальной величин оформить в виде процедуры, глобальные параметры в процедуре не... https://www.cyberforum.ru/ pascal/ thread190976.html
0 / 0 / 0
Регистрация: 10.10.2010
Сообщений: 9
0

Ввести одномерный целочисленный массив А, вывести его. В массиве отсортировать по убыванию все элементы стоящие после минимального. - Pascal - Ответ 1109729

14.11.2010, 21:53. Показов 3511. Ответов 4
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Условие задачи:
Ввести одномерный целочисленный массив А, вывести его. В массиве отсортировать по убыванию все элементы стоящие после минимального.

Помогите решить .Вот программа которую писал проверьте может где есть ошибка.Я не понимаю вот эту строчку как ее записать на языке в паскале:" В массиве отсортировать по убыванию все элементы стоящие после минимального."

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
26
27
28
program odnomernui_massuv;
var A:array[1..100] of integer;
i,Imin,Imax,N: byte;
buf:integer;
begin
cls;
//ручной ввод массива
writeLn(`Вводим элементы массива A:`);
for i:=1 to N
begin write(`A[`,i,`]=`);
readLn (A[i]);
end;
//Вывод массива до изменения
writeLn(`исходный массив  A:`);
for i:=1 to N do
write (A[i]:5);
writeLn;
//поиск максимума и минимума в серии
imax:=1
imin:=1
for i:=1 to do
begin
if A[i]>A[imax] then
imax:=i;
if A[i]<A[imin] then
imin:=i;
end;
writeln(`imax=`,imax, `imin=`,imin);
Помогите пожалуйста. Заранее спасибо за помощь.

Добавлено через 4 часа 44 минуты
помогите

Добавлено через 1 час 4 минуты
ну помогите пожалуйста

Вернуться к обсуждению:
Ввести одномерный целочисленный массив А, вывести его. В массиве отсортировать по убыванию все элементы стоящие после минимального. Pascal
0
Лучшие ответы (1)
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.11.2010, 21:53
Готовые ответы и решения:

Переписать в массив все элементы заданного массива, стоящие после его минимального элемента
Переписать в одномерный массив K все элементы заданного целочисленного массива L , стоящие после...

Ввести одномерный массив X(N) (N<=90). Упорядочить в нем по возрастанию значений все элементы, стоящие после максимального элемента.
Помогите решить пожалуйста, целый день бьюсь никак не получается. Ввести одномерный массив X(N)...

Преобразовать массив, упорядочив по убыванию все элементы, стоящие после второго нулевого
Ввести массив K(N). Вывести его. Преобразовать массив, упорядочив по убыванию все элементы,...

Ввести массив а [1], а [2],..., а [n] целого типа и заменить все его элементы, стоящие после минимального, нулями.
Ввести массив а , а ,..., а целого типа и заменить все его элементы, стоящие после минимального,...

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

Переписать в массив К все элементы заданного исходного, стоящие после его минимального элемента
переписать в одномерный массив К все элементы заданного целочисленного массива L , стоящие после...

Дан массив A(m). Переписать в массив В все элементы, стоящие после максимального элемента и до минимального
Дан массив A(m). Переписать в массив В все элементы, стоящие после максимального элемента и до...

Ввести массив целого типа и заменить все его элементы, стоящие до максимального, нулями
Ввести массив a, a , …, а целого типа и заменить все его элементы, стоящие до максимального,...

Заменить все элементы массива стоящие после минимального на значение минимального элемента
Заменить все элементы массива стоящие после минимального на значение минимального элемента. вот...

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