1 апреля, 20:57

Проверьте программу!

Program f4;

var f1, f2 : text;

s: string;

begin

Assign (f1,'t1. txt') ;

Assign (f2,'t2. txt') ;

Reset (f1) ;

Rewrite (f2) ;

while not eof (f1) do

begin

readln (f1, s) ;

writeln (f2, s) ;

end;

close (f1) ;

close (f2) ;

end.

0
Ответы (1)
  1. 1 апреля, 22:08
    0
    Проверил, ошибок нет. Входной файл переписывается в выходной.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Проверьте программу! Program f4; var f1, f2 : text; s: string; begin Assign (f1,'t1. txt') ; Assign (f2,'t2. txt') ; Reset (f1) ; Rewrite ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Новые вопросы по информатике
Как называются данные или программа на магнитном диске?
Ответы (1)
Найти максимальный элемент числового массива А = и определить его номер А = (3, 5, - 2, 6, 3). N=5 Результат Amax = K =
Ответы (1)
Даны объекты выбери лишний Париж, Берлин, Вильнюс, Мюнхен
Ответы (1)
8 класс, Информатика! Запишите раздел описания переменных, необходимых для вычисления: 1) периметр прямоугольника 2) среднее арифметическое х1 и х2 3) сумма цифр двухзначного числа
Ответы (1)
Написать программу, создающую одномерный массив из 10 элементов. Значения членов массива вводятся при выполнении программы. Программа должна определять сумму отрицательных членов массива.
Ответы (1)
Чем отличается цикл с заданным условием окончания работы от цикла с заданным условием продолжения работы
Ответы (1)
Составить программу которая вычетает значения вырожения y=x1/√2
Ответы (1)
Охарактеризуйте кратко топологию "шина", "звезда", "кольцо".
Ответы (1)
Дана матрица F (m*m) заменить нулями главную диагональ матрицы В С + + basic visual
Ответы (1)
Помогите написать слова: веб сайт, веб страница, провайдер, тэг, хостинг, гипер ссылка. На русском, понятном "человеческом" языке
Ответы (1)