Question

ajutor dau 100 puncte si coroana rapid va rog frumos
indentificati care din urmatoarele bucle sunt infinite si explicati motivul
k:=1 ; While k >0 do begin
Writeln(k); k:= k+2
end;




a:=1; While 17 mod a <> 5 do Writeln(a);





x:=1; While X <>4 do begin
Writeln(X); X:= X+2
end.

Answer 1

primul. k este mereu mai mare dacat 0