Регистрация
angel491
09.04.2023 20:35
Информатика
Есть ответ 👍

Составить блок схему алгоритма c=(a+b)/(a-b)/(a*b)

255
380
Посмотреть ответы 1

Ответы на вопрос:

акакий27
акакий27
4,6(57 оценок)
Const   n = 10; //предельное количество точек var   a: array[1..2 * n] of real;   x, y, l,lmax, lmin: real;   i, j, k: integer; begin   writeln('введите количество точек (не более ', n, ')');   readln(k);   writeln('вводите координаты точек (x,y) попарно');   lmax : = 0;   lmin : = 1e10;   for i : = 1 to k do   begin       j : = 2 * i - 1;       read(a[j], a[j + 1]);       l : = sqr(a[j]) + sqr(a[j + 1]); //квадратами расстояния до точки       if lmax< l then lmax: =l;       if lmin> l then lmin: =l   end;   writeln;   writeln('все точки находятся внутри кольца с радиусами ',sqrt(lmin),', ',sqrt(lmax)) end. тестовое решение: введите количество точек (не более 10) 5 вводите координаты точек (x,y) попарно 3 6 2 5 -4 -3 5 7 3 3 все точки находятся внутри кольца с радиусами 4.24264068711928, 8.60232526704263

Популярно: Информатика