Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
konovalova
0 / 0 / 0
Регистрация: 18.02.2013
Сообщений: 17
#1

Все четные компоненты в файле переписать в другой файл - Pascal ABC

07.03.2013, 15:43. Просмотров 817. Ответов 1
Метки нет (Все метки)

Ввести файл целых чисел F. Все четные компоненты в файле переписать в другой файл H. В его конец дописать количество этих компонент. Файл H распечатать.

не могу разобраться с основной частью!!!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.03.2013, 15:43
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Все четные компоненты в файле переписать в другой файл (Pascal ABC):

Из одного файла, содержащего некоторый набор чисел, переписать в другой файл все четные числа - Pascal ABC
Доброго времени суток светлые:) умы программирования, хочу обратиться к вам за помощью в решении некой задачи по Паскалю, в котором у меня...

В один файл вывести нулевые компоненты, в другой - четные компоненты исходного - Pascal ABC
Дано 3 текстовых файла. В 1-файле есть случайние числа. Во второй файл вывести нулевые компоненты первого файла. А в 3-файл вывести четные...

Переписать в новый файл все компоненты файла, расположенные после максимальной компоненты - Pascal ABC
Дан файл вещественных чисел. Переписать в новый файл все компоненты, расположенные после максимальной компоненты. У меня от силы пара...

Сформировать целочисленный файл, число компонент которого кратно 10. Переписать компоненты файла в другой файл - Pascal ABC
Сформировать целочисленный файл, число компонент которого кратно 10. Переписать компоненты файла в другой файл, изменяя порядок чисел В...

Переписать из исходного файла четные строки в другой файл - Pascal ABC
Ребята, помогите пожалуйста!!! 1. Напишите программу, которая формирует текстовый файл на диске, заполняет его произвольной информацией и...

Переписать в файл F все компоненты массива D, которые больше 0,5 - Pascal ABC
Создать файл G,компонентами которого являются элементы массива D.Переписать в файл F все компоненты массива D, которые больше 0,5.Прочитать...

1
CodeR
Фрилансер
3379 / 2781 / 788
Регистрация: 08.02.2012
Сообщений: 6,543
Записей в блоге: 1
08.03.2013, 08:28 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
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
Var f,h:file of integer;
    m,n,i,k:integer;
Begin
    write('Введите кол-во компонент: ');readln(n);
    Assign(f,'in.dat');Rewrite(f);
    For i:=1 to n do
    Begin
      m:=random(31)-15;
      write(m:4);
      write(f,m);
    End;
    writeln;
    Reset(f);
    Assign(h,'out.dat');Rewrite(h);
    While not Eof(f) do
    Begin
      read(f,m);
      if m mod 2 = 0 then 
      Begin
        write(h,m);
        inc(k);
      End;
    End;
    write(h,k);
    Reset(h);
    While not Eof(h) do
    Begin
      read(h,m);
      write(m:4);
    End;
    Close(f);Close(h);
End.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.03.2013, 08:28
Привет! Вот еще темы с ответами:

Переписать в файл V все четные положительные числа из файла в убывающем порядке - Pascal ABC
Помогите пожалуйста с решением Сформировать файл W, состоящий из целых чисел. Переписать в файл V все четные положительные числа из...

Файл: Получить в другом файле все компоненты файла f, кроме тех, которые кратны К - Pascal ABC
записать файл f последовательно доступа N натуральных чисел . получить в другом файле последовательного доступа все компоненты файла f,...

Переписать в другой файл все строки, читающиеся одинаково с начала и с конца. - Pascal ABC
Дан текстовый файл. Переписать в другой файл все строки, читающиеся одинаково с начала и с конца. Задачка так то проста, но не могу...

Переписать в другой файл все строки с заменой в них запятой на точку - Pascal ABC
Требуется помощь в двух задачах, пишу сюда, ибо сам зашел в тупик. Желательно код с комментариями, дабы понять все: 2. Имеется...


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

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

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