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 вроде все)))
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 вроде все)))