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

Программа выведет: 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;