Текстовые файлы: построить отрезки по координатам из файла

@vsvladan · Регистрация: 07.03.2013

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

Дан файл натуральных чисел. Количество чисел в файле кратно четырем, каждые два последовательных числа определяют координаты некоторой точки на плоскости. Считая, что заданы координаты концов отрезков, построить их. заранее спасибо

@Puporev · 10.04.2013, 12:00

Pascal

uses graphABC;
var f:text;
    x1,y1,x2,y2:integer;
begin
assign(f,'tochki.txt');
reset(f);
while not eof(f) do
 begin
  read(f,x1,y1,x2,y2);
  setpencolor(clrandom);
  line(x1,y1,x2,y2);
 end;
close(f)
end.

@vsvladan 0 / 0 / 0 Регистрация: 07.03.2013 Сообщений: 55
		1
	Текстовые файлы: построить отрезки по координатам из файла 10.04.2013, 10:25. Показов 1574. Ответов 1 Метки нет (Все метки) Дан файл натуральных чисел. Количество чисел в файле кратно четырем, каждые два последовательных числа определяют координаты некоторой точки на плоскости. Считая, что заданы координаты концов отрезков, построить их. заранее спасибо 0

	10.04.2013, 12:00

Текстовые файлы: построить отрезки по координатам из файла

Решение