На координатной плоскости заданы 150 точек с дана окружность произвольного радиуса с произвольным центром .найти расстояние до точки минимально удаленной от центра окружности и лежащей внутри окружности в 3 четверти / изобразить это расстояние графически ПЛЭЭЗ
{Free Pascal Compiler version 3.0.4+dfsg-23 [2019/11/25] for x86_64}
{Copyright (c) 1993-2017 by Florian Klaempfl and others}
{Target OS: Linux for x86-64}
program test;
Uses Math;
const N = 15;
var
A : array[1..N] of integer;
i, mx, k : integer;
begin
Randomize;
{Генерация и печать массива}
for i := 1 to N do begin
A[i] := Random(50);
write(A[i], ' ');
if A[i] mod 2 = 1 then mx := A[i]
end;
writeln;
for i := 1 to N do
if A[i] mod 2 = 1 then
if A[i] < mx then begin
mx := A[i];
k := i
end;
writeln('Число - ', mx, ', позиция - ', k);
end.
Результат выполнения программы:
Си++
#include <iostream>
using namespace std;
long f(long n) {
return 3*n*n+1;
}
int main(){
long k, i;
cin >> k;
i = 0;
while (f(i) < k) i++;
cout << i << endl;
}
В результате этой программы выведется число 5, т.е при i = 5 цикл завершается, но для i = 4 он был выполнен.
Значит, нам нужно рассматривать те значения k, которые лежат в промежутке f(4) < k ≤ f(5)
Согласно функции:
f(4) = 3 * 4 * 4 + 1 = 48 + 1 = 49
f(5) = 3 * 5 * 5 + 1 = 75 + 1 = 76
Значит, k может принимать следующие значения:
50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76 — 27 значений
(Р.S. k = 76 также учитывается, т.к. при этом i = 5 (поскольку 76 < 76 рассматривается как неверное утверждение))
ответ: 27