Информатика, вопрос задал zohon16 , 2 года назад

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

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

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

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

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

zohon16: ахах да!!

Ответы на вопрос

Ответил karimPhoenix

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

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

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