#include "protheus.ch"

User Function A02Ex05()  // Referente ao While
Local nMostra := 1

While nMostra <= 10
	MsgAlert(nMostra)
	nMostra++

	If nMostra == 5
		Exit
	EndIf
EndDo
Return

User Function A02Ex05A()  // Referente ao While - versão 2
Local nMostra := 1

While nMostra <= 10
	MsgAlert(nMostra)

	If nMostra == 5
		Exit
	EndIf
	nMostra++
EndDo
Return