Question

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

Answer 1

В ответе -10 будет.
Т.к. в алгоритме новое значение присвоится Y, а не R.

Answer 2

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

1) Считывание значения R с помощью команды read(R). Значение R станет -10. 2) Проверка условия if R = 0 then Y := R*10. Условие не выполняется, так как R не равно 0. 3) Проверка условия if R > 0 then Y := R + 10. Условие не выполняется, так как R меньше 0. 4) Проверка условия if R < 0 then Y := R * R / 2. Условие выполняется, так как R меньше 0. Значение Y будет равно -10 * -10 / 2 = 50. 5) Вывод на экран значения R с помощью команды writeln('R = ', R). В результате будет напечатано "R = -10".