Что будет напечатано в результате выполнения следующего фрагмента программы, если значение 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).
В ответе -10 будет. Т.к. в алгоритме новое значение присвоится Y, а не R.