Array134. Дано множество A из N точек (точки заданы своими координатами x, y). Найти пару различных точек этого множества с максимальным расстоянием между ними и само это расстояние (точки выводятся в том же порядке, в котором они перечислены при задании множества A).
>Решение Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 | program Array134; var A: array [1..10,1..2] of real; R,Rmax:real; N,i,i2,Point1,Point2: integer; begin Write('N: '); Readln(N); Writeln('A: '); for i:=1 to N do begin write(i,'.x :'); readln(a[i,1]); write(i,'.y :'); readln(a[i,2]); end; Rmax:=0; Point1:=0; Point2:=0; for i:=1 to N-1 do for i2:=i+1 to N do begin R:=sqrt(sqr(A[i,1]-A[i2,1])+sqr(A[i,2]-A[i2,2])); writeln(R); if (R > Rmax) then begin Rmax:=R; Point1:=i; Point2:=i2; end; end; Writeln ('(',A[Point1,1],':',A[Point1,2],') (',A[Point2,1],':',A[Point2,2],')'); end. |
>
Решение C
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 | #include <stdio.h> #include <math.h> int main(void) { float a[10][2]; int n; printf("N: "); scanf("%i",&n); int i; for (i=0; i<n; ++i){ printf("a[%i]:\n",i+1); printf(" x : "); scanf("%f",&a[i][0]); printf(" y : "); scanf("%f",&a[i][1]); } int a1=0, a2=0,i2; float r,rmax=0; for (i=0; i<n; ++i){ for (i2=i+1; i2<n; ++i2){ r= sqrt(pow(a[i][0]-a[i2][0],2)+pow(a[i][1]-a[i2][1],2)); if (r > rmax) { rmax=r; a1=i; a2=i2; } } } printf("A %i :\n x: %f\n y: %f\n",a1+1,a[a1][0],a[a1][1]); printf("A %i :\n x: %f\n y: %f\n",a2+1,a[a2][0],a[a2][1]); return 0; } |