А = 10
В = 20
1. Подставляем числа в следующее уравнение
А = -В * В / А
А = -20 * 20 \ 10 = -40
2. Далее идет разветвление алгоритма, выполняем уравнение:
А > B
-40 > 20
3. Поскольку у нас А меньше В, то выполняем команду:
С = 2 * А - В
С = 2 * -40 - 20 = -100
Ответ : С:=(-100)
P.S. Странно получается, у тебя там на схеме, нету стрелочки от последнего пункта до первого?
3. program n3;
uses crt;
var b:integer;
begin
write('Введите число ');
read(b);
writeln(b);
<span>end.
4. </span>program n4;
uses crt;
var c:real;
begin
write('Введите число ');
readln(c);
c:=c*2;
writeln('Ответ равен 'c);
<span>end.
5. </span>program n5;
uses crt;
var y,z,x:real;
begin
write('Введите число ');
readln(x);
y:=5.5;
z:=x-y;
writeln('Ответ равен 'z);
<span>end.
6. </span>program n6;
uses crt;
var y,x,z:real;
begin
write('Введите число ');
readln(x);
y:=2.5;
z:=x/y;
writeln('Ответ равен 'z);
<span>end.</span>