Помогите пожалуйста.. вопрос внутри.

Question

Что будет напечатано в результате выполнения следующей программы, если значение R=-10? 
Readln(R) 
If R=0 then y:=R*10 
If R>0 then y:=R+10 
If R<0 then y:=R*R/2 
Writeln (`R=`,R). 
Что получится, помогите пожалуйста! А) R=0 B)R=100 C)R=-10 D)R=50 ???

Женя · Accepted Answer

так как R меньше нуля, ему присваивается значение третьей строки -10*(-10)/2 
D) R=50

аааа нет нет 
я лошпо))) ) 
ответ С, так как в итоге мы пишем Writeln (R)

Любовницу · Answer

У тебя она не откомпилится. Компилятор будет ругаться, что нету точек с запятой.