5. Исправьте ошибки в программе.var c, a : integer; d : integer;begin c:=10;a:= 6; d:=2*c/(a+2;writeln('При с =' , c, '; Значение переменной d' , = , d);end.

var

c, a : integer;

d : real;

begin

c:=10;

a:= 6;

d:=2*c/(a+2);

writeln('При с =' , c, '; Значение переменной d = ' ,d);

end.

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using System.Threading.Tasks;

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           double x1, x2, x3, y1, y2, y3;

           Console.WriteLine("Введите координаты:");

           x1 = Double.Parse(Console.ReadLine());

           y1 = Double.Parse(Console.ReadLine());

           x2 = Double.Parse(Console.ReadLine());

           y2 = Double.Parse(Console.ReadLine());

           x3 = Double.Parse(Console.ReadLine());

           y3 = Double.Parse(Console.ReadLine());

           double dist12 = Math.Sqrt(Math.Pow((x2 - x1), 2) + Math.Pow((y2 - y1), 2));

           double dist13 = Math.Sqrt(Math.Pow((x3 - x1), 2) + Math.Pow((y3 - y1), 2));

           double dist23 = Math.Sqrt(Math.Pow((x3 - x2), 2) + Math.Pow((y3 - y2), 2));

           double P = dist12 + dist13 + dist23;

           double p = P / 2;

           double Area = p * (p - dist12) * (p - dist13) * (p - dist23);

           Console.WriteLine("Площадь {0}", Area);

           Console.ReadKey();

       }

   }

}

Вводятся координаты (x;y) точки и радиус круга (r). Определить принадлежит ли данная точка кругу, если его центр находится в начале координат.

Будем считать, что точка принадлежит кругу, если находится внутри его или на его окружности.

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