1. Исправить ошибки в программе;

2. Что выведется на экран в результате выполнения программы?

War:a, b, c-integer. x:real;

Bigin

A=7, b=3,2, c:=a+b;

Writln (summa=, c) ;

C:=c/2; x:=a-c;

Writeln ('x=', x,'kvadrat=', x*x) ;

and

1). var

a:integer;

b, c, x:real;

begin

a:=7;

b:=3.2;

c:=a+b;

writeln ('summa=', c) ;

c:=c/2;

x:=a-c;

writeln ('x=', x,'kvadrat=', x*x) ;

end.

2). Первое-выведется сумма цифр равная "C"

второе-выведется значение "х"=а минус полу сумма (1,9 это будет) а потом квадрат этого числа, т. е. 1,9*1,9=3,61 ... вроде все)))