Составьте программу вычисления значения функции y=x в квадратье + 28 sin a

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (x,a):=ReadReal2('Введите x и а через пробел:');
  var y:=x*x+28*Sin(a);
  Writeln('y=',y)
end.

Пример
Введите x и а через пробел: 3.18 -2
y=-15.3479279511191

Program z1;
var  x, y, a: real;
begin
  write('x = ');
  readln(x);
  write('a = ');
  readln(a); 
 y := x * x + 28 * sin(a); 
 writeln('ответ:', y);
end.

1) 73=1001001 (2)         2)91=1011011 (2)
     44=101100 (2)               28=11100 (2)

+1001001                            -1011011
     101100                                  11100
                             
  1110101= 117 (10)             111111=63 (10)

 

3)27=11011 (2)

    5=101 (2)
    *11011

          101

   

  +  11011

    00000

  11011

 

10000111=135

 

4)70=1000110 (2)

    7=111 (2)

 - 1000110 | 111

     111         |
    1010= 10 (10)

         -111

          111

           

               0

1) 73=1001001 (2)         2)91=1011011 (2)
     44=101100 (2)               28=11100 (2)

+1001001                            -1011011
     101100                                  11100
                             
  1110101= 117 (10)             111111=63 (10)

 

3)27=11011 (2)

    5=101 (2)
    *11011

          101

   

  +  11011

    00000

  11011

 

10000111=135

 

4)70=1000110 (2)

    7=111 (2)

 - 1000110 | 111

     111         |
    1010= 10 (10)

         -111

          111

           

               0