Написать программу в Паскале согласно следующего условия

Question

.(23)Напишите программу согласно следующего условия: даны две точки A(xl, yl) и В (x2,y2). Определить, которая из точек находится ближе к началу координат.

Ирина Карпова · Accepted Answer

Где сумма квадратов координат меньше - та и ближе)

Илья Ларькин · Answer

Залил на файлообменик, так как майл не разрешает полностью вставить решение. 
http: //www. fayloobmennik. net/2539555 Пароль 12345 
Программа проверена, если что-то не получается пиши.