Что будет напечатано в результате выполнения следующего фрагмента программы, если значение R равно -10?

read(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=-10.Ты уверена, что программа написана правильно? Просто код считывает -10 в R, и ее выводит так, что следующие строчки бесполезныif R = 0 then Y := R*10;if R > 0 then Y := R+ 10;if R < 0 then Y := R * R/2;