Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/18: Рейтинг темы: голосов - 18, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 09.11.2016
Сообщений: 3

Вывести на экран все числа из файла, упорядоченные по возрастанию

12.12.2016, 17:05. Показов 3392. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В текстовом редакторе создать файл из целых чисел, разделённых пробелами. В программе вводится имя созданного файла. Вывести на экран все числа из файла, упорядоченные по возрастанию.
Буду благодарен, если поможете
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.12.2016, 17:05
Ответы с готовыми решениями:

Вывести на экран все отрицательные числа, упорядоченные по возрастанию
пожалуйста решите 2 задачи, очень срочно надо!!!!!!!!!!!! 1. дан одномерный массив a1,a2,...,an. упорядочить данный массив по НЕ...

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

Занести в текстовый файл h из текстового файла t целые числа, упорядоченные по возрастанию
В текстовом файле t записаны целые числа, упорядоченные по убыванию. Занести в текстовый файл h из текстового файла t целые числа,...

1
57 / 57 / 114
Регистрация: 09.12.2016
Сообщений: 143
13.12.2016, 08:57
Лучший ответ Сообщение было отмечено opuhols как решение

Решение

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
const m=1000;
var a:array[1..m] of integer;
fn:string;
i,n,j,buf:integer;
f:text;
begin
writeln('Введите имя файла');
readln(fn);
assign(f,fn);reset(f);
n:=0;
while not eof(f) do begin
    n:=n+1;
    read(f,a[n]);end;
for i:=1 to n-1 do
    for j:=1 to n-i do begin
       if a[j] > a[j+1] then begin
           buf:=a[j];a[j]:=a[j+1];a[j+1]:=buf;
       end;
    end;
writeln('Числа из файла:');
for i:=1 to n do
    write(a[i], ' ');
close(f);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.12.2016, 08:57
Помогаю со студенческими работами здесь

Занести в бинарный файл h из текстового файла t целые числа, упорядоченные по возрастанию
Не получается..(((киньте идеи.. В текстовом файле t записаны целые числа, упорядоченные по убыванию. Занести в бинарный файл h из...

Прочитать файл, заполнить контейнер структур и вывести построчно все записи, упорядоченные по возрастанию
Помогите пожалуйста, только начала работать с файлами и не понимаю даже с чего начать. Текстовый файл содержит записи вида: Фамилия Имя...

Вывести на экран все числа, лежащие между двумя введенными по возрастанию
Завтра экзамен по информатике и последний срок. Помогите пожалуйста с двумя заданиями. Иначе меня отчислят. Программы на языке Си 1: С...

Помогите вывести на экран из файла out1.txt числа кратные 20 а из второго все простые числа.
Помогите вывести на экран из файла out1.txt числа кратные 20 а из второго все простые числа.

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru