Pascal ABC

@woody_5553 · Регистрация: 21.01.2021

Author24 — интернет-сервис помощи студентам

текстовые файлы a и b содержат по две строки с текстом. создать файл c в котором будут эти же строки, в следующем порядке: 1 из А 1 из Б 2 из А и 2 из Б

@Puporev · 21.01.2021, 20:21

Сообщение от woody_5553

1 из А 1 из Б 2 из А и 2 из Б

1 и 2 это слова что ли?

@woody_5553 · 22.01.2021, 20:29 **[ТС]**

Это строки

@Puporev · 22.01.2021, 20:38

Pascal

var a,b,c:text;
    s:string;
    i:integer;
begin
//файлы А и В в папке с программой
assign(a,'A.txt');
reset(a);
assign(b,'B.txt');
reset(b);
assign(c,'C.txt');
rewrite(c);
for i:=1 to 2 do
 begin
  readln(a,s);
  writeln(c,s);
  readln(b,s);
  writeln(c,s);
 end;
close(a);
close(b);
close(c);
end.

@woody_5553 0 / 0 / 0 Регистрация: 21.01.2021 Сообщений: 4
		1
	Pascal ABC 21.01.2021, 18:00. Показов 1094. Ответов 3 Метки paskal abc (Все метки) текстовые файлы a и b содержат по две строки с текстом. создать файл c в котором будут эти же строки, в следующем порядке: 1 из А 1 из Б 2 из А и 2 из Б 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	21.01.2021, 20:21	2
	Сообщение от woody_5553 1 из А 1 из Б 2 из А и 2 из Б 1 и 2 это слова что ли? 0

@woody_5553 0 / 0 / 0 Регистрация: 21.01.2021 Сообщений: 4
	22.01.2021, 20:29 [ТС]	3
	Это строки 0

	22.01.2021, 20:38

Pascal ABC

Решение