 егорка140 
                                                05.10.2021 20:58
                                                
                                                егорка140 
                                                05.10.2021 20:58
                                             Ulya391 
                                                15.05.2020 18:18
                                                
                                                Ulya391 
                                                15.05.2020 18:18
                                             nikitos15012 
                                                15.05.2020 18:18
                                                
                                                nikitos15012 
                                                15.05.2020 18:18
                                             DashaShitova2006 
                                                15.05.2020 18:19
                                                
                                                DashaShitova2006 
                                                15.05.2020 18:19
                                             ScRoller 
                                                15.05.2020 18:18
                                                
                                                ScRoller 
                                                15.05.2020 18:18
                                             dianasmertiyk 
                                                15.09.2021 06:20
                                                
                                                dianasmertiyk 
                                                15.09.2021 06:20
                                             mssuslova1980 
                                                10.05.2020 16:07
                                                
                                                mssuslova1980 
                                                10.05.2020 16:07
                                             Анека1111111 
                                                10.05.2020 16:07
                                                
                                                Анека1111111 
                                                10.05.2020 16:07
                                             matkazina 
                                                10.05.2020 16:21
                                                
                                                matkazina 
                                                10.05.2020 16:21
                                            
begin
write(введите X1 и x2)
readin(x1, x2)
write(введите y1 и y2)
readin(y1 и y2)
a:=sqrt (sqr (x1) + sqr (y1));
b:=sqrt (sqr (x2) + sqr (y2));
if a>b then writeln ('1-я точка ближе')
else writeln ('2-я точка ближе');
end.