#include < stdio.h> #include < math.h> void minmax(int x1[],int y1[]) { int i, j, imax, jmax, imin, jmin; int len=sizeof(x1); float max = 0; float min = 1000; float r; for ( i = 0; i < len-1; i ++ ) for ( j = i+1; j < len; j ++ ) { r = sqrt((x1[i]-x1[j])*(x1[i]-x1[j])+(y1[i]-y1[j])*(y1[i]-y1[j])); if (r> max) { max = r; imax = i; jmax = j; } if (r< min) { min = r; imin = i; jmin = j; } } printf("max = %f точки: %d - %d\n", max, imax+1, jmax+1); printf("min = %f точки: %d - %d\n", min, imin+1, jmin+1); } int main() { int n=5; int x[n], y[n], i; srand (time(null)); for ( i = 0; i < n; i ++ ) { x[i] = rand() % 20 -10; y[i] = rand() % 20 -10; printf ("%4d, %4d ", x[i], y[i]); printf("\n"); } minmax(x,y); return 0; } пример: -10, 4-5, 2-9, -1 7, 2 7, -3max = 17.117243 точки: 1 - 4 min = 5.000000 точки: 2 - 3
Stenenko
30.04.2023
На будущее: за 8 программу никто писать не будет. программа, возможно, не совершенна (т.е. по-любому, можно было сделать короче), однако работает. написана на pascal, тестировал в веб-среде pascalabc. var mo,tu,we,th,fr,sa,su,a: shortint; var b: real; begin write('температура воздуха в понедельник: '); readln(mo); write('температура воздуха во вторник: '); readln(tu); write('температура воздуха в среду: '); read(we); write('температура воздуха в четверг: '); readln(th); write('температура воздуха в пятницу: '); readln(fr); write('температура воздуха в субботу: '); readln(sa); write('температура воздуха в воскресенье: '); readln(su); a: =mo+tu+we+th+fr+sa+su; b: =a/7; write('средняя температура воздуха: ',b: 0: 2,' градусов.'); end.