11.Что будет напечатано в результате выполнения следующей программы, если значение равно...

Question

11.Что будет напечатано в результате выполнения следующей программы, если значение равно R = -16? Program n_1; var R,y: real; begin readln (R); if R>0 then y:=R*5+1; if R=0 then y:=R+8/2; if R<0 then y:=R*R/4 +10; writeln (‘R=’,R); end. РЕШИТЕ ПЖ ДАЮ 15 БАЛЛОВ, СРОЧНО ИЛИ УЧИЛКА ПОСТАВИТ 2

Answer 1

Ответ:

R=-16

Объяснение:

readln (R); => -16

R<0 => y:=R*R/4 +10 = -16* -16/4 + 10 = 74

writeln (‘R=’,R); => R=-16

Странно что программа выводит R, может там ошибка и должен выводится y?