Turbo Pascal

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

Войти

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

Другие темы раздела
Turbo Pascal Вычислить значение выражения Нужна помощь по решении этого примера https://www.cyberforum.ru/ turbo-pascal/ thread328704.html	Turbo Pascal Вычислить систему неравенств Помощь в решении
Turbo Pascal Школьная. Пожалуйста помогите, учусь в девятом классе, не врубаюсь: Определите периметры треугольников, заданных координатами их вершин А(5,2); В(5,2); С(5,2). Длину стороны треугольника вычислить в подпрограмме-функции. 20:47:26 Точки вместо (5,2) как я понял подставлять любые свои. Добавлено через 16 минут Если кто-то может помочь - пожалуйста помогите, задачу сдавать завтра при любых... https://www.cyberforum.ru/ turbo-pascal/ thread328668.html	Turbo Pascal Вычислить значение выражения r:=sqrt(sqr(a)+sqr(b))/sqrt(1-sqr(y)) https://www.cyberforum.ru/ turbo-pascal/ thread328654.html
Изобразить летящего комара Turbo Pascal Ребят даны такие задачи: 1.Циссоида: x3+(x-a)y2=0, a>0. Воспользуйтесь параметрическим представлением: x=at^2/1+t^2,y=at^3/1+t^2,-∞ < t < +∞. 2.Изобразить летящего комара Заранее спасибо.	Turbo Pascal Ввывод на экран Помогите прописатьв программе чтобы после ввода матриц они выводились на экран) Зарание спс) Текст программы: Program Fellix; uses crt; type mas=array of integer; mas1=array of integer; Var a,b,xn:mas; z1, z2, a1:mas1; j,i,k,n1,m1,n2,m2:integer; Procedure sum (n,m:integer; xn:mas; var a1:mas1); var i,j,k:integer; https://www.cyberforum.ru/ turbo-pascal/ thread328606.html
Turbo Pascal график функции построение графика функции f(x)=a+b+c^dx+f https://www.cyberforum.ru/ turbo-pascal/ thread328562.html	Turbo Pascal Изменить информацию в поле <оклад> для записей с заданным табельным номером 1.Создать набор данных содержащих сведения о сотрудниках учреждения. Записи упорядочить по табельному номеру. Структура записи: __________________________________________________________________________________ \|Табельный номер___\|___Фамилия___\|___Должность___\|___Оклад___\|____Стаж работы\| \|____________________\|______________\|________________\|____________\|________________\| 2.Изменить...
Turbo Pascal Меньшее из чисел умножить на 3 https://www.cyberforum.ru/ turbo-pascal/ thread328517.html Написать программу создания 2-х динамических целочисленных переменных.ввести их значения с терминала и меньшее из них умножить на 3	Turbo Pascal Определить сумму цифр числа дано натуральное число N.Определить: а)сумму цифр; б)есть ли в записи числа цифра "5". https://www.cyberforum.ru/ turbo-pascal/ thread328478.html
Turbo Pascal Организовать поиск наибольшего элемента массива из н вещественых чисел рекурсианвм способом Организовать поиск наибольшего элемента массива из н вещественых чисел рекурсианвм способом	Turbo Pascal Паскаль Графика Нарисовать на фоне пейзажа периодически движущийся закрашенный прямоугольник. Движение из точки с координатами (0,0) в точку с координатами (640, 400). Размеры прямоугольника ввести с клавиатуры. Движение прерывается после нажатия клавиши “F2”. Не получается реализовать движение квадрата именно в точку (640, 400), так как размеры квадратов разные и вводятся с клавиатуры....подскажите,... https://www.cyberforum.ru/ turbo-pascal/ thread328464.html

sa_

0 / 0 / 0

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

Сообщений: 19

02.07.2011, 08:21 [ТС]

Все четные элементы файла записать во второй файл и отсортировать их в порядке возрастания - Turbo Pascal - Ответ 1811820

02.07.2011, 08:21. Показов 1399. Ответов 14

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

Ответ

Pascal

1	reset(f2);

вот я открываю файл
вставляю сортировку

Pascal

for i := 1 to n-1 do
for j := 1 to n-i do
if a[j] > a[j+1] then begin
k := a[j];
a[j] := a[j+1];
a[j+1] := k
end;
writeln('Fail chetnih chisel:');
while not eof(f2) do
begin
read(f2,a[i]);
write(a[i],' ');
end;
close(f2);

но все равно сортировка не работает

Вернуться к обсуждению:
Все четные элементы файла записать во второй файл и отсортировать их в порядке возрастания Turbo Pascal

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

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

IT_Exp

Эксперт

34794 / 4073 / 2104

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

Сообщений: 32,602

Блог

02.07.2011, 08:21

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

Все четные элементы файла записать во второй файл и отсортировать их в порядке возрастания
Помогите пожалуйста не могу сделать сортировку в файлах. помогите пожалуйста не знаю как это...

Все четные числа файла записать во второй файл, а нечетные — в третий файл
Имеется файл, элементами которого являются целые числа. Все четные числа этого файла записать во...

Все четные числа файла записать во второй файл, а нечетные — в третий
Имеется файл, элементами которого являются целые числа. Все четные числа этого файла записать во...

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

	02.07.2011, 08:21

BasicMan

Эксперт

29316 / 5623 / 2384

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

Сообщений: 30,364

Блог

02.07.2011, 08:21

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

Записать во второй файл только отрицательные четные элементы первого
Создать типизированный файл из целых чисел в диапазоне . Записать во второй файл только...

Четные цифры отсортировать в порядке возрастания
в одномерном числовом массиве четные цифры отсортировать в порядке возрастания. массив должен...

Массив. Вывести все четные в порядке возрастания их индексов,все нечетные в порядке их убывания
помогите, пожалуйста, решить задачи по массивам. очень нужно. полностью пропустила эту тему( 1.дан...

Записать в файл С все четные числа файла F, а в файл N - все нечетные.
сформировать файл F, компонентами которого являются целые числа. записать в файл С все четные числа...

Новые блоги и статьи
Книги и учебные ресурсы по C# InfoMaster 08.01.2025 Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .	Что такое NullReferenceException и как исправить? InfoMaster 08.01.2025 NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .	Что такое Null Pointer Exception (NPE) и как это исправить? InfoMaster 08.01.2025 Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .	Русский язык в консоли C++ InfoMaster 08.01.2025 При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .	Telegram бот на C# InfoMaster 08.01.2025 Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .	Использование GraphQL в Go (Golang) InfoMaster 08.01.2025 Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор? Alexander-7 08.01.2025 Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .	Как работать с GraphQL на TypeScript InfoMaster 08.01.2025 Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .	Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .	Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .

Наверх