0 / 0 / 0
Регистрация: 29.06.2010
Сообщений: 24
1

Получить новый файл из исходного с заменой букв

30.06.2010, 17:12. Показов 1315. Ответов 1
Метки нет (Все метки)

Имеется типизированный файл, элементами которого являются отдельные буквы, составляющие последовательность ОЛГАРИТМ. Получить новый файл, в котором буквы слова АЛГОРИТМ будут расположены правильно.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.06.2010, 17:12
Ответы с готовыми решениями:

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

Найти сумму элементов и минимальный элемент. Получить новый файл, поместив в него только те компоненты исходного файла, которые представляют собой неч
Решите задачу пожалуйста если вам не трудно :) ►Сформировать типизированный файл натуральных...

Получить новый массив из четных, положительных элементов исходного
Создать массив динамической памяти A(n). Получить новый массив из четных,положительных элементов.

Получить из исходного массива новый массив по заданным правилам преобразования
Написать программу, которая из исходного массива получает новый такой, что в нем сначала идут...

1
Почетный модератор
64253 / 47553 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
01.07.2010, 08:30 2
Лучший ответ Сообщение было отмечено Shark19 как решение

Решение

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
uses crt;
const s:string='ОЛГАРИТМ';
var f,g:file of char;
    a:char;
    i:byte;
begin
clrscr;
assign(f,'filef');
rewrite(f);
assign(g,'fileg');
rewrite(g);
for i:=1 to length(s) do
write(f,s[i]);
reset(f);
seek(f,3);
read(f,a);
write(g,a);
for i:=1 to 2 do
 begin
  seek(f,i);
  read(f,a);
  write(g,a);
 end;
seek(f,0);
read(f,a);
write(g,a);
for i:=4 to filesize(f)-1 do
 begin
  seek(f,i);
  read(f,a);
  write(g,a);
 end;
close(f);
writeln('Содержание нового файла');
reset(g);
while not eof(g) do
 begin
  read(g,a);
  write(a);
 end;
close(g);
readln
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.07.2010, 08:30
Помогаю со студенческими работами здесь

Создать новый файл, компонентами которого являеются числа исходного, кратные 3
Создать типизированный файл Р содержащий последовательность целых чисел. Создать файл Р1,...

Создать новый текстовый файл, содержащий k последних строк исходного файла
Дано число k (< 10) и текстовый файл, содержащий более k строк. Создать новый текстовый файл,...

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

Получить файл g, образованный из файла f заменой всех его прописных букв одноименными строчными
1. Дан символьный файл f. Получить файл g, образованный из файла f заменой всех его прописных...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru