Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
AnGeLiNk
0 / 0 / 0
Регистрация: 11.01.2016
Сообщений: 9
1

Создать файл f, компонентами которого являются символьные массивы

02.03.2016, 14:52. Просмотров 839. Ответов 1
Метки нет (Все метки)

Создать файл f, компоненты которого являются символьные массивы s1...s15.
Требуется преобразовать каждый
Из массивов , переставив содержащиеся в нем символы * в его конец . преобразованные массивы должны быть написаны в тот же самый файл f. Можно использовать вспомогательный массив g
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.03.2016, 14:52
Ответы с готовыми решениями:

Задан файл F, компонентами которого являются численные массивы X [15]. Найти минимальные элементы каждого из массивов и вывести в выходной файл.
добрый день. нужен текст программы к задаче в Pascal. Задан файл F,...

Создать файл F, элементами которого являются целочисленные массивы
Создать файл F, элементами которого являются целочисленные массивы a1a2…a5. Для...

Типизированный файл: Создать файл F1, компонентами которого являются "m" одинаковых чисел, а именно "min" элемент из файла F
Создать типизированный файл F, содержащий последовательность целых чисел....

Дан файл F, компонентами которого являются действительные числа
Дан файл F, компонентами которого являются действительные числа. Найти разность...

Дан файл G, компонентами которого являются вещественные числа
Дан файл G, компонентами которого являются вещественные числа. Найти сумму...

1
Puporev
Модератор
54699 / 42113 / 29077
Регистрация: 18.05.2008
Сообщений: 99,391
02.03.2016, 18:35 2
Лучший ответ Сообщение было отмечено AnGeLiNk как решение

Решение

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
44
45
46
47
48
49
50
51
52
const m=15;
type mas=array[1..m] of char;
var n,i,j,k,p:integer;
    f:file of mas;
    x:mas;
    c:char;
begin
randomize;
assign(f,'massiv');
rewrite(f);
write('Сколько массивов записать в файл n=');
readln(n);
for i:=1 to n do
 begin
  for j:=1 to m do
  x[j]:=chr(40+random(5));//символы ( ) * + ,
  write(f,x);
 end;
writeln('Исходный файл');
reset(f);
for i:=0 to filesize(f)-1 do
 begin
  seek(f,i);
  read(f,x);
  for j:=1 to m do
  write(x[j]:2);
  writeln;
  k:=0;
  for j:=m downto 1 do
  if x[j]='*' then
   begin
    k:=k+1;
    c:=x[j];
    for p:=j to m-k do
    x[p]:=x[p+1];
    x[m-k+1]:=c;
   end;
  seek(f,i);
  write(f,x);
 end;
writeln;
writeln('Измененный файл');
reset(f);
while not eof(f) do
 begin
  read(f,x);
  for j:=1 to m do
  write(x[j]:2);
  writeln;
 end;
close(f);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.03.2016, 18:35

Сформировать файл, компонентами которого являются целые числа, определяемые по формуле
Дано натуральное n. Сформировать файл G, компонентами которого являются целые...

Дан файл, компонентами которого являются n-мерные векторы. Векторы с наибольшим модулем перенести в конец файла
Дан файл, компонентами которого являются n-мерные векторы. Векторы с наибольшим...

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


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

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

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