Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Разработать программу сложения и вычитания двух матриц https://www.cyberforum.ru/ pascal/ thread895657.html Даны натуральные числа n, m и две матрицы разрядности nхm целочисленных элементов, где n,m≤10. Разработать программу сложения и вычитания двух матриц. %-) Помогите очень прошу! :wall:	Pascal Представление математическим выражением Доброго времени суток, дано выражение: X+9/(3X/A)+Sqr(Cos(X))/2/Sqrt(X)+1.0E-5Exp(9Ln(X)) Собственно сам не могу решить задачу так как не могу точно сказать где начинается знаменатель, и смущает (3X/A):xex: Вот все что осилил сам и уверен что правильно: x+9/(3X/A)+cos^2/2/x^0.5+10^-5X^9 Заранее благодарен за советы и помощь!
Pascal Создать текстовый файл, который содержит 1000 случайных целых чисел https://www.cyberforum.ru/ pascal/ thread895517.html Создать текстовый файл, который содержит 1000 случайных целых чисел. Числа в файле должны быть разбиты на 50 строк по 20 чисел в строке. После создания этого файла вывести его на экран.	Pascal Ряд Маклорена https://www.cyberforum.ru/ pascal/ thread895499.html Помогите решить,в PascalABC
Pascal Midlet Pascal: поле чудес Нужна в помощь в написании игры Помогите пожалуйста написать игру "поле чудес" ...Но с минимум визуализацией...Можно чуть чуть графики... Вопрос и ответ,которые уже заранее написанные в файле...	Pascal Построить секторную диаграмму для данных чисел https://www.cyberforum.ru/ pascal/ thread895297.html Помогите с простенькой задачкой :) Дано пять целых чисел a1...a5 Построить секторную диаграму для этих чисел. желательно с использованием "pieslice"
Pascal Дана строка s, содержащая менее чем 100 символов. Заменить в данной последовательности все строчные латинские буквы одноименными заглавными Дана строка s, содержащая менее чем 100 символов. Заменить в данной последовательности все строчные латинские буквы одноименными заглавными. Использовать стандартные процедуры и функции в действиях над строками. Показал var s:string; i:integer; begin readln(s); for i:=1 to length(s)do s:=Upcase(s); https://www.cyberforum.ru/ pascal/ thread895136.html	Pascal Динамический список в Pascal Здравствуйте. Изучаю список в паскале и наткнулся на непонятную вещь. Суть задачи: есть программа. Программа умеет создавать новые элементы списка и заполнять их, умеет выводить статистику по элементам и выводить содержимое элементов. Но после вывода статистики или содержимого становится невозможным добавить еще один элемент в список. Грешу на указатели, но черт знает... type Ukazatel = ^S;...
Pascal Найти число положительных элементов и их сумму, которые находятся на главном диагонале элементов матрицы Кто сможет решит ?! Пожалуйста! 2 - задача Массив: С(N,N) Найти число положительных элементов и их сумму, которые находятся на главном диагонале элементов матрицы. https://www.cyberforum.ru/ pascal/ thread894996.html	Pascal Сортировка односвязного списка Помогите доделать эту лабораторную. В ней проблема с сортировкой односвязного списка, функцию для сортировки взял отсюда, но она не работает с этими входными данными: 153 967 8 0 9 22 35 1, к тому же автор не знает про именование функций и переменных и читать его код его сортировки тяжело. Сортирую по ключам (ключ - первая цифра числа). Вчера нашел ошибку, она была в том, что при обмене значений... https://www.cyberforum.ru/ pascal/ thread894572.html
Найти сумму чисел ряда, модуль которых больше или равен числу е Pascal Даны числовой ряд и некоторое число е. Найти сумму чисел ряда, модуль которых больше или равен числу е.Общий член ряда имеет вид a_{n}=\frac{(-1)^{n-1}}{n^{n}} Программа в любом случае выдает в ответе сумму чисел 0, почему??? program posledovatelnost; var i,n,m:integer; a,e,s:real; begin write('Введите число m - ');readln(m); write('Введите число e - ');readln(e); a:=0;	Pascal CharToInteger https://www.cyberforum.ru/ pascal/ thread894527.html Всех приветствую.Проблема у меня небольшая,вобщем иногда нужно если переменная типа Char хранит цифру,эту цифру записать в переменную типа Integer.Конечно я использовал,процедуру Val,но не удобная она.Я ищу более простой способ.Но где-то недавно я увидел (и к сожалению не записал) способ связанный с таблицей ASII.Может кто-то знает как? Добавлено через 11 минут Вопрос исчерпан,Google помог....

Супчик

0 / 0 / 0

Регистрация: 06.06.2013

Сообщений: 8

Метод сортировки выбором - Pascal - Ответ 4691440

08.06.2013, 21:00. Показов 715. Ответов 1

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Нужно создать программу при помощи которой
1)заполнить масив А(40) случайными числами из диапазона 100 до 999
2)вывести елементы масива в одну строчку
3)упорядочить масив учитывая такие критерии
1)Диапазон елементов масива 1-33
2)Метод сортировки выбором
3)Все выведенные рандомные числа должны быть кратны 3
Я тут уже немного сделал, но вот с кратностью не получается...

Pascal

program MAS;
var A:array[1..40]of integer;
var b:array[1..40]of integer;
var i, k, j, x, m:integer;
begin
cls;
writeln('Первичный вид заполненого масива');
randomize;
for i:=1 to 40 do begin
A[i]:=random(899)+100;
end;
for i:=1 to 40 do begin
write(A[i]:4);
end;
writeln(' ');
writeln('Отсортированый масив');
for i:= 1 to 39 do begin
for j:= i+1 to 40 do begin
if A[i]>A[j] then begin
x:=A[i]; A[i]:=A[j]; A[j]:=x;
end; end; end;
for i:=1 to 33 do begin
B[i]:=A[i]
end;
m := 40;
i := 1;
while i <= m do
if B[i] =0 then begin
for j := i to m - 1 do
B[j] := B[j+1];
m := m - 1
end
else
i := i + 1;
for i:=1 to 33 do begin
write(A[i]:4);
end;
writeln(' ');
writeln('Конечный вид масива');
for i:=1 to m do begin
write(B[i]:4);
end;
end.

Вернуться к обсуждению:
Метод сортировки выбором Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

08.06.2013, 21:00

Готовые ответы и решения:

Расставить элементы массива в порядке возрастания методом сортировки выбором и сортировки простыми вставками
Здрасьте еще раз!С прошедшим вас праздником! я глупая и бестолковая опять пришла к вам на...

Написать комментарии, поясняющие принцип сортировки. (Метод сортировки - вставками)
Написать комментарии, поясняющие принцип сортировки. (Метод сортировки - вставками) Если вдруг...

Алгоритм сортировки выбором
Задача: Дан массив, состоящий из записей. Каждая запись содержит два поля: 1 - табельный номер...

Метод сортировки как метод подсчета
Существует такой метод сортировки как метод подсчета. Метод заключается в том, что каждый ...

	08.06.2013, 21:00

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

08.06.2013, 21:00

Помогаю со студенческими работами здесь

Неправильно работает процедура сортировки выбором
С книги переписан данный пример. Подскажите, почему выходит ошибка? Всё в точности как в книге. ...

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

Написать алгоритм сортировки выбором
Нужна помощь. Написать алгоритм сортировки выбором: выбирается очередной минимальный элемент и...

Метод Гаусса с выбором главного элемента
Ребят!помогите пожалуйста создать простенькую программу ,без замудрений . На Тему :Метод Гаусса с...

Наверх