Включить в созданный файл ft все простые числа, не превышающие 2000

@pit · Регистрация: 04.12.2007

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

В общем, есть 2 задачи, если у кого-нибудь есть время и желание - помогите, плиз.

1) Сформировать типизированный файл fz из записей, каждая из которых содержит простое число и его палиндром. Включить в созданный файл ft все простые числа, не превышающие 2000.

2) Дан текстовый файл in.txt, содержащий произвольный текст. Получить файл out.txt, содержащий исходный текст с выровненными краями. Выравнивание производить засчёт равномерной вставки пробелов в более короткие строки.

@dioxidin · 06.12.2007, 15:30

Автор вы бы сказали в чем собсна проблема... чего не понимаете...
Если не знаете с какого бока подойти к задаче - это одно
Если не знаете как работать с текстовыми файлами - другое

Я вот например слово ПАЛИНДРОМ плохо понимаю

, но зато немного знаю как работать с файлами... Так что опишите вашу проблему поконкретнее и "люди к Вам потянутся"

@AngelFantom · 06.12.2007, 16:34

Для роботы з текстовыми файлами очень удобны команди
readln(F,S);
и
writeln(S,F);
Если проблемы именно с записью и чтением с файлов, то рекомендую посмотреть примеры именно этих команд.

@Mika · 09.02.2008, 17:26

Пожалуйста, покажите пример задачи с текстовым файлом в среде Delphi. Например: Создать тесты

Vovan-VE · 10.02.2008, 10:27

Pascal

var f:Text;
...
AssignFile(f, 'c:\path\file.ext');
Rewrite(f);
WriteLn(f, 'bla-bla-bla');
CloseFile(f);

@Михайло · 10.02.2008, 14:41

Только єто - для Delphi. Для Паскаль нужно поубирать слово file:

Assign(f, 'c:\path\file.ext');
Close(f);

@Spill · 29.02.2008, 13:49

В Делфи тоже можно писать без "~file", только если это пишется в обычной процедуре, а не в обработчике события.

22.08.2008, 17:42

Помогите, пожалуйста, решить вот такую задачку:"Текстовый файл содержит сведения о кольцевых туристических маршрутах: список городов и стоимость тура в рублях, в каждой строке файла один маршрут (например, «Челябинск – Екатеринбург – Казань – Москва – Самара – Уфа – Челябинск. 5000»). Требуется найти маршрут с наибольшим количеством городов и указать его стоимость.
Полученные данные записать в текстовый файл."

@NoNaMe · 22.08.2008, 18:52

Сообщение от Viper535

Помогите, пожалуйста, решить вот такую задачку:"Текстовый файл содержит сведения о кольцевых туристических маршрутах: список городов и стоимость тура в рублях, в каждой строке файла один маршрут (например, «Челябинск – Екатеринбург – Казань – Москва – Самара – Уфа – Челябинск. 5000»). Требуется найти маршрут с наибольшим количеством городов и указать его стоимость.
Полученные данные записать в текстовый файл."

И в чем пробема? например считай количество символов "-" в строке командой pos (разумеется, если в имени города не может встречаться символ "-"), а потом выводи его стоимость

@MAcK · 22.08.2008, 18:55

Сообщение от NoName

И в чем пробема? например считай количество символов "-" в строке командой pos (разумеется, если в имени города не может встречаться символ "-"), а потом выводи его стоимость

Да не забывать потом писать
delete(stroka, 1, pos('-', stroka))

@Spill · 22.08.2008, 19:58

или можно в цикле For пробежаться в поиске "-"

@Spill 40 / 40 / 1 Регистрация: 22.02.2008 Сообщений: 64
	22.08.2008, 19:58	11
	или можно в цикле For пробежаться в поиске "-" 0

@pit 0 / 0 / 0 Регистрация: 04.12.2007 Сообщений: 3
		1
	Включить в созданный файл ft все простые числа, не превышающие 2000 04.12.2007, 16:24. Показов 4324. Ответов 10 Метки нет (Все метки) В общем, есть 2 задачи, если у кого-нибудь есть время и желание - помогите, плиз. 1) Сформировать типизированный файл fz из записей, каждая из которых содержит простое число и его палиндром. Включить в созданный файл ft все простые числа, не превышающие 2000. 2) Дан текстовый файл in.txt, содержащий произвольный текст. Получить файл out.txt, содержащий исходный текст с выровненными краями. Выравнивание производить засчёт равномерной вставки пробелов в более короткие строки. 0

@dioxidin 132 / 99 / 11 Регистрация: 21.11.2007 Сообщений: 544
	06.12.2007, 15:30	2
	Автор вы бы сказали в чем собсна проблема... чего не понимаете... Если не знаете с какого бока подойти к задаче - это одно Если не знаете как работать с текстовыми файлами - другое Я вот например слово ПАЛИНДРОМ плохо понимаю , но зато немного знаю как работать с файлами... Так что опишите вашу проблему поконкретнее и "люди к Вам потянутся" 0

@AngelFantom 0 / 0 / 0 Регистрация: 02.07.2007 Сообщений: 9
	06.12.2007, 16:34	3
	Для роботы з текстовыми файлами очень удобны команди readln(F,S); и writeln(S,F); Если проблемы именно с записью и чтением с файлов, то рекомендую посмотреть примеры именно этих команд. 0

@Mika 0 / 0 / 0 Регистрация: 31.03.2012 Сообщений: 3
	09.02.2008, 17:26	4
	Пожалуйста, покажите пример задачи с текстовым файлом в среде Delphi. Например: Создать тесты 0

@Михайло 118 / 118 / 10 Регистрация: 12.05.2010 Сообщений: 1,207
	10.02.2008, 14:41	6
	Только єто - для Delphi. Для Паскаль нужно поубирать слово file: Assign(f, 'c:\path\file.ext'); Close(f); 0

@Spill 40 / 40 / 1 Регистрация: 22.02.2008 Сообщений: 64
	29.02.2008, 13:49	7
	В Делфи тоже можно писать без "~file", только если это пишется в обычной процедуре, а не в обработчике события. 0

Viper535
	22.08.2008, 17:42	8
	Помогите, пожалуйста, решить вот такую задачку:"Текстовый файл содержит сведения о кольцевых туристических маршрутах: список городов и стоимость тура в рублях, в каждой строке файла один маршрут (например, «Челябинск – Екатеринбург – Казань – Москва – Самара – Уфа – Челябинск. 5000»). Требуется найти маршрут с наибольшим количеством городов и указать его стоимость. Полученные данные записать в текстовый файл."

@NoNaMe Модератор 1762 / 671 / 141 Регистрация: 10.06.2009 Сообщений: 2,604
	22.08.2008, 18:52	9
	Сообщение от Viper535 Помогите, пожалуйста, решить вот такую задачку:"Текстовый файл содержит сведения о кольцевых туристических маршрутах: список городов и стоимость тура в рублях, в каждой строке файла один маршрут (например, «Челябинск – Екатеринбург – Казань – Москва – Самара – Уфа – Челябинск. 5000»). Требуется найти маршрут с наибольшим количеством городов и указать его стоимость. Полученные данные записать в текстовый файл." И в чем пробема? например считай количество символов "-" в строке командой pos (разумеется, если в имени города не может встречаться символ "-"), а потом выводи его стоимость 0

@MAcK Комбайнёр 1606 / 704 / 77 Регистрация: 27.05.2008 Сообщений: 2,535
	22.08.2008, 18:55	10
	Сообщение от NoName И в чем пробема? например считай количество символов "-" в строке командой pos (разумеется, если в имени города не может встречаться символ "-"), а потом выводи его стоимость Да не забывать потом писать delete(stroka, 1, pos('-', stroka)) 0