1. неліктен алгоритм орындаушыларын формальды және
формальды емес деп екі топқа бөлеміз?
2. не үшін орындаушылардың командалар жүйесі әртүрлі?
3. неге әр алгоритмді құрғанда «басы», «соңы» команда-
лары болу керек? ​

using System;

namespace kp9p_pr_10_zad_6

{

   class Program

   {

       delegate void Square(double a1, double b1, double alfa1);

       static void Main(string[] args)

       {

           double a, b; // переменные для сторон a и b  

           double alpha; // переменная для угла альфа  

           Console.WriteLine("Введите значения треугольника:\n ");

           Console.Write("a: ");

           a = double.Parse(Console.ReadLine());   // ввод стороны a  

           Console.Write("b: ");

           b = double.Parse(Console.ReadLine()); // ввод стороны b  

           Console.Write("Угол альфа: ");

           alpha = double.Parse(Console.ReadLine()); // ввод угла альфа  

           sq(a, b, alpha);  

           static void sq(double a1, double b1, double alpha1) // функция sq расчета и вывода площади  

           {

               Console.WriteLine("\nПлощадь: {0}", (a1 * b1 * Math.Sin(alpha1)) / 2); // вывод и расчет площади  

           }

       }

   }

}  

// PascalABC.NET 3.1, сборка 1214 от 09.04.2016
function f(x:real):=3+x*(4+x*(5+x*6));

begin
  var a:=-1.0;
  var b:=0.0;
  var eps:=1e-6;
  var fa:=f(a);
  var x,fx:real;
  if abs(fa)<=eps then Writeln('x=',a,',y=',fa)
  else begin
    var fb:=f(b);
    if abs(fb)<=eps then Writeln('x=',b,',y=',fb)
    else
      if fa*fb>0 then Writeln('На указанном интервале корней нет')
      else
        repeat
          x:=(a + b)/2;
          fx:=f(x);
          if abs(fx)<=eps then Writeln('x=', x, ', y=', fx)
          else
            if fa*fx>0 then a:=x else b:=x;
        until abs(fx)<=eps
  end
end.

Результат выполнения программы:
x=-0.790308952331543, y=-6.74849237825015E-07