М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
buzovkina81
buzovkina81
11.07.2022 09:04 •  Информатика

Вырази круг в градусах рассчитай длину круга

👇
Ответ:
Ira1214
Ira1214
11.07.2022

Круг – это геометрическая фигура, где точки плоскости имеют расстояние до определенной точки не более, чем заданное. Его окружность представляет собой замкнутую плоскую кривую, в которой все точки удалены на одинаковое расстояние от центра.

Зачастую круг называют частью плоскости, которая ограничивается окружностью. Для абсолютно любой окружности ее длина и диаметр одинаковы. Такое соотношение обозначают трансцендентным числом π = 3.1415

Периметр, как и длина круга имеет одинаковую величину в круге. Наш калькулятор вам вычислить периметр этой фигуры при значения радиуса. Все что от вас требуется для этого просто ввести радиус заданного вами круга. Длина окружности круга равна двум пи умноженным на радиус.

 - это формула, которая высчитывать точный периметр круга.

4,8(78 оценок)
Открыть все ответы
Ответ:
Польха
Польха
11.07.2022
Const
    n = 3;
    m = 3;

var
    i, j: integer;
    a, b: array[1..n, 1..m] of integer;

begin
    for i := 1 to n do
    begin
        for j := 1 to m do
        begin
            a[i, j] := random(20) - 10;
            write(a[i, j]:3, ' ');
        end;
        writeln;
    end;
    writeln;
    
    for i := 1 to n do
    begin
        for j := 1 to m do
        begin
            if ((i + j) mod 2 = 1) and (a[i, j] < 0) then
                a[i, j] := sqr(a[i, j]);
            write(a[i, j]:4, ' ');
        end;
        writeln;
    end;
end.
4,5(87 оценок)
Ответ:
ilia9999999999
ilia9999999999
11.07.2022
// PascalABC.NET 3.1, сборка 1246 от 23.05.2016
begin
  var s:=ReadAllLines('1.txt');
  Writeln('Считано:'); s.Println(NewLine);
  var a:=s.Select(x->x.Replace(';',' ')).ToArray
    .JoinIntoString.ToReals.Where(x->(x>0) and (Frac(x)=0))
    .Select(x->Trunc(x)).ToArray;
  Writeln('Получено:'); a.Println();
  Writeln('Справочно: тип А - ',a.GetType);
end.

Тестовое решение
Считано:
1;-312;-41.11;412.11
43.63;-15;27;7.62;3;-14
1342;23.23;-32.19;18
Получено:
1 27 3 1342 18
Справочно: тип А - System.Int32[]

Тестовый файл 1.txt дан во вложении.
4,6(33 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ