С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Транспортная задача на паскале. https://www.cyberforum.ru/ pascal/ thread4947.html
Помогите решить задачу на Pascal она не из простых, но надо срочно!!!(желательно 3 способа: полным перебором, случайной генерации и эверестическим) m предприятий, выпускающих однородную продукцию, можно разместить в n городах (не более одного предприятия в городе). Известны мощности предприятий ai, i=1..m и потребности bj, j=1..n каждого города в продукции предприятий, а также расстояния Cij,...
Pascal Работа со строками в паскале.
Рассматривается непустая строка, содержащая не более 80 символов.Каждый символ строки может быть малой англ. буквой, цифрой или одним из знаков +, -, *.Группой букв будет наз. такая совокупность последовательно расположенных букв, которой непосредственно не предшествует и за которой непосредственно не следует буква. Аналогично определяется группа цифр и знаков.Палиндромом будет наз. такая группа...
Pascal Дан массив целых чисел. Отсортировать по убыванию разностей между соседними элементами Помогите решить задачу пожалуйста. Дан массив целых чисел.Отсортировать по убыванию разностей между соседними элементами; Напишите код программы плиз. Я сам написал, но что то неправильно работает. https://www.cyberforum.ru/ pascal/ thread4944.html Pascal Задачки на квадратную матрицу, паскаль https://www.cyberforum.ru/ pascal/ thread4943.html
:!: 1. Дана матрица, расставить строки матрицы по возрастанию суммы элементов каждой стороки. 2. Вывести на экран число, которое повторяется во всех столбцах квадратной матрицы.
Pascal Технология обработки символьной информации
1.Практическое задание: технология обработки символьной информации, задание на разработку программы по подсчету количества появлений конкретного символа в заданном фрагменте текста Завтра Экзамен... Привидите пожалуйста пример такой программы - она вроде простая...
Pascal помогите написать программу которая будет строить график параболы https://www.cyberforum.ru/ pascal/ thread4937.html
:mrgreen: помогите написать программу которая будет строить график параболы вида K*X*X+B*X+C, ГДЕ K, B, C ВВОДИТ ПОЛЬЗОВАТЕЛЬ. пРИЧЕМ ОСИ OX И OY ДОЛЖНЫ ПЕРЕМЕЩАТЬСЯ В ЗАВИСИМОСТИ ОТ РАСПОЛОЖЕНИЯ ГРАФИКА , МАСШТАБ ДОЛЖЕН ОСТАВАТЬСЯ ПОСТОЯННЫМ: 20 ПИКСЕЛЕЙ ( ВООБЩЕМ ГРАФИК ДОЛЖЕН БЫТЬ ТАКИМ ЖЕ, КАКОЙ МЫ СТРОИМ НА УРОКАХ...
Pascal Помогите решить пожалуйста. https://www.cyberforum.ru/ pascal/ thread4933.html
Помогите решить пожалуйста. 1. Даны числа а, b, с, d, e, f. Напечатать координаты точки пересечения прямых, описываемых уравнениями a*х+b*y=c и d*х+e*y=f, либо сообщить, что эти прямые совпадают, не пересекаются или вовсе не существуют. 2. Дана функция x=a*sin(k*t+2)*cos(k*t). Составить алгоритм для расчета этой функции, если а изменяется от 5 до 7 с шагом 0.12, t изменяется от 4.2 до 6.2 с...
Сжать массив, удалив из него все элементы, модуль которых находиться в интервале [a, b] Pascal
Уважаемя администрация помогите пожайлуста бедному студенту с решением задаче на паскале: В однородном массиве, состоящем из n вещественных элементов, вычислить: 1) Максимальный элемент массива 2) Сумму элементов массива, расположенных до последнего положительного эелемента Сжать массив, удалив из него все элементы, модуль которых находиться в интервале . Освободившееся в конце массиа элементы...
Pascal Вычислить значение бесконечной суммы Помогите решить задачу:Вычислить значение бесконечной суммы s=1-x^2/(2*3)+x^3/(3*4)... (-1)^k*x^k/k/(k+1) с точностью до eps. Считать, что точность достигнута, если очередное слагаемое по модулю меньше eps. С клавиатуры вводяться eps и X. https://www.cyberforum.ru/ pascal/ thread4930.html Pascal написать на Pascal игру, в которой есть кораблики, соревнующиеся между собой https://www.cyberforum.ru/ pascal/ thread4927.html
:idea: Привета! Задача формулировалась преподом довольно размыто, поэтому может присутствовать некоторая вольность в выполнении, что не может не радовать. Смысл в том, чтоб написать на Pascal (к сожалению) игру, в которой есть кораблики, соревнующиеся между собой :) Препод седой уже, кстати. Он хотел там видеть возможность выбора направления ветра и хода корабликов галсами при встречном ветре,...
Pascal Определить, является ли номер дня допустимым для данного месяца.
подскажите сто делать дальше!!!! УСЛОВИЕ: Вводятся пары чисел (первое – номер дня, второе – номер месяца). Определить, является ли номер дня допустимым для данного месяца. Программа завершает работу, если первое число равно 777. программа не работает!!!((((((((((( PROGRAM PGR_3; USES CRT; VAR A, B:INTEGER; BEGIN CLRSCR; WRITELN ('VVEDITE A'); READLN (A);
Pascal Вводится число. Определить, является ли оно степенью двойки. Вводится число. Определить, является ли оно степенью двойки. P.S. Сойдёт и консольный вариант! Я уж как нибудь "пере-оформлю" в визуальный вариант! 8) https://www.cyberforum.ru/ pascal/ thread4924.html
Почетный модератор
7393 / 2639 / 281
Регистрация: 29.07.2006
Сообщений: 13,696
14.05.2007, 03:27 0

Расставить элементы массива в порядке возрастания методом сортировки выбором и сортировки простыми вставками - Pascal - Ответ 22989

14.05.2007, 03:27. Показов 5854. Ответов 8
Метки (Все метки)

Лучший ответ Сообщение было отмечено ildwine как решение

Решение

Как ты сказала: сама программ у тебя уже есть. Поэтому покажу, как сделать модуль. Пример простого вывода массива. Создаешь обычный паскалевский файл. ТОлько с разделами interface и implementation. В первом объявляешь процедуры, иди функции, в втором их код пишешь. Т. е.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
unit Unit1;
 
interface
 
type TArray = array[0..10, 0..10] of integer;
 
procedure arr(a:tarray);
 
implementation
procedure arr(a:tarray);
var i, j:integer;
begin
for i:=0 to 3 do begin
writeln;
  for j:= 0 to 3 do
    write('  ', a[i, j], '  ');
  end;
end;
end.

А вот главный ( вызывающий модуль )

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program Project1;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils, 
  Unit1;   //подключаем
 
var a:tarray;
i, j:integer;
 
begin
writeln('Vvedite massiv');
for i:=0 to 3 do
for j:=0 to 3 do
readln(a[i, j]);
//вызываем
arr(a);
readln;
end.
Писал в Delphi. В паскале тоже самое.

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

Отсортировать элементы массива, кратные 3, методом быстрой сортировки
помогите пожалуйста очень надо заранее спасибо Дан одномерный массив А, состоящий из N элементов....

Отсортировать указанные элементы массива методом быстрой сортировки
Дан одномерный массив А, состоящий из N элементов. Отсортировать указанные элементы б) методом...

Подпрограмма сортировки массива из записей вставками
Разработать программу с подпрограммой сортировки вставками массива из записей. Заранее спасибо.

Разработайте рекурсивную процедуру сортировки последовательности методом быстрой сортировки Хоара
Помогите!!!! Дана последовательность чисел a1, a2, ... , an. Разработайте рекурсивную процедуру...

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

Сортировка двухмерного массива по строкам. Расставить строки в порядке возрастания суммы их элементов
Паскаль. Нужно отсортировать двухмерный массив по строкам. Т.е строки выстроить в порядке...

Разместить элементы вектора в порядке убывания на основе заданных методов сортировки
Дан целочисленный вектор А. Программно реализовать алгоритм размещения элементов вектора А в...

В одномерном массиве упорядочить элементы по убыванию методом пузырьковой сортировки.
Составить блок-схему алгоритма решения задачи и программу. В массиве C упорядочить элементы по...

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

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