1.Исправить ошибки в программе;2.Что выведется ** экран в результате выполнения...

Question

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

Comments

это паскаль и у тебя проблемы с грамматикой, или это не паскаль и я туплю?)))

---

Дан текст программы в таблице с ошибками

---

Надо исправить ошибки

---

ахах)))) ну ок) щас будет)))

---

ахах да!!

Answer 1

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

Comments

Спасибо большое!!!

---

всегда пожалуйста)))