нет кавычек и точек с запятой
Write ('ведите координаты точки и радиусы');
в условии непонятно откуда взялось r20 (такой переменной в программе нет)
Объяснение:
чтобы выводить текст на экран, его следует заключать в кавычки (оператор вывода write выводит то, что находится в круглых скобках, но текст должен быть в одинарных кавычках )
операторы отделяются один от другого точкой с запятой (;)
