Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
Guli4ka
0 / 0 / 0
Регистрация: 15.04.2013
Сообщений: 12
1

Текстовый файл. Найти самый большой и самый маленький компонент файла

15.04.2013, 11:15. Просмотров 1250. Ответов 7
Метки нет (Все метки)

Дан файл Ф,его компоненты - целые числа. Найти самый большой и самый маленький компонент файла
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.04.2013, 11:15
Ответы с готовыми решениями:

Дано матрицу, состоящую из нулей и единиц. Найти самый большой по площади прямоугольник, состоящий из одних единиц
Дано матрицу, состоящую из нулей и единиц. Найти самый большой по площади прямоугольник, состоящий...

Выполнить поиск самый дорогой и самый дешевый товары.По нажатию специальной кнопки выполнить их обмен местами
плииз

Найти среднее арифметическое компонент массива, удалив самый большой и самый маленький элементы
Найти среднее арифметическое компонент массива , убрав самый большой и самый маленький элементы

В заданной матрице найти самый большой отрицательный элемент и самый маленький положительный и вывести их на экран
Помогите пожалуйста с заданиями) Задание 1: Напишите программу, которая создает двухмерный массив...

Как переставить местами самый маленький и самый большой элементы массива?
1. Переставить местами маленький и самый большой элементы массива

7
Samhain
691 / 566 / 414
Регистрация: 31.03.2013
Сообщений: 1,029
15.04.2013, 12:31 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var f:TextFile;
    x,naib,naim:integer;
begin
assignfile(f,'TextFile.txt');
reset(f);
read(f,x);
naib:=x;
naim:=x;
while not eof(f) do
  begin
    read(f,x);
    if x>naib then naib:=x;
    if x<naim then naim:=x
  end;
writeln('naibolshee chislo = ',naib,', naimenshee chislo = ',naim) ;
readln
end.
1
Guli4ka
0 / 0 / 0
Регистрация: 15.04.2013
Сообщений: 12
15.04.2013, 14:49  [ТС] 3
а как можно это сделать по дельфи? ну как типа вывести на Едит наибольшие и наименьшие числа файла...
0
Тамила
752 / 545 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
15.04.2013, 15:19 4
Цитата Сообщение от Guli4ka Посмотреть сообщение
а как можно это сделать по дельфи?
Выгрузить из файла в мемо и уже пробегаться по этим элементам и искать мин и макс
0
15.04.2013, 15:19
ZfoxAK
529 / 505 / 230
Регистрация: 26.11.2012
Сообщений: 2,024
16.04.2013, 09:46 5
Samhain, Вам предложил решение. Выведите значение переменных в edit-ы и будет в дельфи.
0
DenNik
Непрофессионал
2031 / 1601 / 309
Регистрация: 26.07.2011
Сообщений: 8,285
Записей в блоге: 1
16.04.2013, 09:57 6
Цитата Сообщение от Samhain Посмотреть сообщение
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var f:TextFile;
    x,naib,naim:integer;
begin
assignfile(f,'TextFile.txt');
reset(f);
read(f,x);
naib:=x;
naim:=x;
while not eof(f) do
  begin
    read(f,x);
    if x>naib then naib:=x;
    if x<naim then naim:=x
  end;
writeln('naibolshee chislo = ',naib,', naimenshee chislo = ',naim) ;
readln
end.
сомнительное решение. с чего ты взял, что исходный файл - текстовый? он может быть
f: file of byte;
f: file of word;
f: file of Cardinal;
f: file of integer;


Цитата Сообщение от Тамила Посмотреть сообщение
Выгрузить из файла в мемо и уже пробегаться по этим элементам и искать мин и макс
Тамила, по той же причине сомнительно
0
ZfoxAK
529 / 505 / 230
Регистрация: 26.11.2012
Сообщений: 2,024
16.04.2013, 10:38 7
Цитата Сообщение от DenNik Посмотреть сообщение
сомнительное решение. с чего ты взял, что исходный файл - текстовый? он может быть
Изходя из названия темы
0
DenNik
Непрофессионал
2031 / 1601 / 309
Регистрация: 26.07.2011
Сообщений: 8,285
Записей в блоге: 1
16.04.2013, 12:44 8
Цитата Сообщение от ZfoxAK Посмотреть сообщение
Изходя из названия темы
хм, упустил из вида. все равно, данные в таком файле могут по разному быть организованы.
0
16.04.2013, 12:44
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.04.2013, 12:44

Определить самый большой и самый маленький элементы сформированного вектора
Сформировать и напечатать вектор с m ( m &lt;= 50 ) трехзначных случайных чисел. В каждом номере все...

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

Найти самый маленький по размеру файл и переместить в другую папку
Здравствуйте. Мне нужно вывести на экран содержимое двух папок и в первой папке найти самый...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru