Задание

Укажите номер строки, после выполнения которой значение переменной r изменится на отличное от нуля число

(1) var r: real;

(2) begin

(3) write('Введите r: ');

(4) readln(r);

(5) r2 := r * r;

(6) r4 := r2 * r2;

(7) r8 := r4 * r4;

(8) writeln(r,' в степени 8 = ',r8);

(9) end.