///////////////////////////////////////////////////////////////////////////////////////////
Program n1;
Uses CRT;
Const n=20;
Var a: array[1..n] of integer;
i: integer;
begin
ClrScr;
Writeln('Vvedite massiv');
For i:=1 to n do
readln(a[i]);
For i:=1 to n do
If a[i]<0 then a[i]:=a[i]*(-5)
else if a[i]>0 then a[i]:=a[i]*20
else a[i]:=1000;
For i:=1 to n do
write(a[i]:5);
readln
end.
Ответ:
это логотип компании которая его выпустила
Объяснение:
название компании не знаю
#include <iostream>
#include <cmath>
using namespace std;
double dist(double x[2], double y[2]) {
return sqrt((x[0] - y[0]) * (x[0] - y[0]) + (x[1] - y[1]) * (x[1] - y[1]));
}
int main() {
double points[4][2];
for (int i = 0; i != 4; ++i) {
cin >> points[i][0] >> points[i][1];
}
double min = dist(points[0], points[1]);
for (int i = 0; i != 4; ++i) {
for (int j = i + 1; j != 4; ++j) {
double new_min = dist(points[i], points[j]);
if (new_min < min) {
min = new_min;
}
}
}
cout << min;
}