Объяснение:
using System;
namespace ConsoleApp2
{
class Program
static void Main(string[] args)
bool InArea = false;
Console.Write("R=");
double R = double.Parse(Console.ReadLine());
Console.Write("x=");
double x = double.Parse(Console.ReadLine());
Console.Write("y=");
double y = double.Parse(Console.ReadLine());
// Проверяем попадает ли в полукруг
if (x <= 0 && y >= 0 && x * x + y * y <= R * R) InArea = true;
// Проверяем попадает ли в первую половинку треугольника
// Уравнение прямой будет y=-2x
if (x > 0 && x <= R/2.0 && y >= -2*x && y<=0) InArea = true;
// Проверяем попадает ли во вторую половинку треугольника
// Уравнение прямой будет y=2x-2R
if (x > 0 && x <= R / 2.0 && y >= 2 * x - 2 * R && y <= 0) InArea = true;
if(InArea) Console.WriteLine("Точка принадлежит области");
else Console.WriteLine("Точка не принадлежит области");
Console.ReadLine();
}
var
A: array [1..3, 1..5] of Integer;
i, j: Integer;
s: Real;
begin
Randomize;
WriteLn ('Массив:');
for i := 1 to 3 do begin // заполнение массива случайными значениями и вывод для просмотра
for j := 1 to 5 do begin
A [i, j] := Random (22) - 11;
Write (A [i, j], ' ');
end;
Writeln;
for i := 1 to 3 do begin // замена элементов с четной суммой индексов на 555
if (i + j) mod 2 = 0 then
A [i, j] := 555;
WriteLn;
WriteLn ('Результат: '); // вывод результата
for i := 1 to 3 do begin
end.
Объяснение:
using System;
namespace ConsoleApp2
{
class Program
{
static void Main(string[] args)
{
bool InArea = false;
Console.Write("R=");
double R = double.Parse(Console.ReadLine());
Console.Write("x=");
double x = double.Parse(Console.ReadLine());
Console.Write("y=");
double y = double.Parse(Console.ReadLine());
// Проверяем попадает ли в полукруг
if (x <= 0 && y >= 0 && x * x + y * y <= R * R) InArea = true;
// Проверяем попадает ли в первую половинку треугольника
// Уравнение прямой будет y=-2x
if (x > 0 && x <= R/2.0 && y >= -2*x && y<=0) InArea = true;
// Проверяем попадает ли во вторую половинку треугольника
// Уравнение прямой будет y=2x-2R
if (x > 0 && x <= R / 2.0 && y >= 2 * x - 2 * R && y <= 0) InArea = true;
if(InArea) Console.WriteLine("Точка принадлежит области");
else Console.WriteLine("Точка не принадлежит области");
Console.ReadLine();
}
}
}
var
A: array [1..3, 1..5] of Integer;
i, j: Integer;
s: Real;
begin
Randomize;
WriteLn ('Массив:');
for i := 1 to 3 do begin // заполнение массива случайными значениями и вывод для просмотра
for j := 1 to 5 do begin
A [i, j] := Random (22) - 11;
Write (A [i, j], ' ');
end;
Writeln;
end;
for i := 1 to 3 do begin // замена элементов с четной суммой индексов на 555
for j := 1 to 5 do begin
if (i + j) mod 2 = 0 then
A [i, j] := 555;
end;
end;
WriteLn;
WriteLn ('Результат: '); // вывод результата
for i := 1 to 3 do begin
for j := 1 to 5 do begin
Write (A [i, j], ' ');
end;
Writeln;
end;
end.