Alexah 0 Posted September 1, 2020 Report Share Posted September 1, 2020 Program Cont ; var N, cont : integer; Begin cont := 1; writeln('Informe o valor de N'); readln(N); while(N > 10000) do begin writeln('Valores Invalidos'); readln(N); end; Quote Link to post Share on other sites
Question
Alexah 0
Program Cont ;
var
N, cont : integer;
Begin
cont := 1;
writeln('Informe o valor de N');
readln(N);
while(N > 10000) do
begin
writeln('Valores Invalidos');
readln(N);
end;
Link to post
Share on other sites
0 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.