Скопировать текст из файла в файл - Pascal

  1. Необходимо скопировать из 1 файла в другой не используя строк (String). Там через Char как-то. Буду благодарен

textual

Код:

  repeat
    BlockRead(f, c, SizeOf(c), r);
    BlockWrite(g, c, r, w);
  until r<SizeOf(c);

Похожие ответы
  1. Дан типизированный файл целых чисел. Записать в первый выходной файл все числа, стоящие на нечетных позициях в файле, а в другой выходной файл – на чётных.

  1. Здравствуйте! Помогите, пожалуйста, реализовать эту процедуру. Пытался делать через сортировку и вывод первых пяти позиций, но, как я понял, такой метод не реализуем, а других идей нет. Заранее спасибо. Задание: В файле записей содержатся сведения об арендаторах торговых площадей: ИНН, название организации, телефон, занимаемая площадь, стоимость аренды. В новый файл записей переписать информацию о пяти арендаторах, которые платят максимальную арендную плату за свои площади;Добавлено через 28 минут Алсо, как сделал это я. Но мне кажется, что весь мой код стоит на костылях, и вряд ли вообще даст нужный результат.

  1. создать типизированный файл целых чисел, скопировать во 2 файл из исходного записи, хранящие простые числа вот такая вот задачка %(

  1. Ввести с клавиатуры строку. Скопировать часть строки с определенной позиции и определенной длины в другую строку. Номер позиции и количество символов ввести с клавиатуры. Вывести скопированную строку на экран

  1. Пусть описана константа и два типа-массива:

  1. Составьте программу записывающую в файл одномерный массив случайных чисел, а затем считывающую его с диска и выполняющую запись четных элементов в другой файл. p.s. начал не могу закончит

  1. Код sum:=0 НЦ ДЛЯ 1 от -3 до 3 НЦ для j от -3 до 3 ЕСЛИ i*i/9+j*j/4<1 то SUM:=SUM+1 ВСЕ КЦ КЦ Чему равно значение SUM?

  1. Мне нужно скопировать из одного текстового файла в другой последовательность строк, заданных начальным и конечным порядковыми номерами от начала файла.И затем вывести на экран количество скопированных символов букв и число скопированных слов, являющихся ПАЛИНДРО*МАМИ.


Нашли ошибку?
Развитие проекта
Яндекс.Метрика