Casa / DESENVOLVIMENTO / Como usar o While no Pascal Zim – Aula 4

Como usar o While no Pascal Zim – Aula 4

Como usar o While no Pascal no programa de copilação pascal-zim. Usando o while pedimos ao Pascal para repetir “enquanto” a expressão for verdadeira. Ou seja enquanto retornar falso o laço continuara a rodar ate que a ele retorne verdadeiro. “While” aula 4 de 5


veja aqui abaixo a sintaxe na linguagem pascal e logo apos um exemplo de aplicação do comando na mesma.

Sintaxe

 while <condição> do
  begin
    <comandos>;
    <comandos>;
  end;

Veja o exemplo acima usando while:

 program  media_notas;
 uses crt;
 var
 NOME: string;
 N1, N2, N3, MEDIA: real;
 CONT: integer;
 begin 
  clrscr;
       CONT:=0;  
       while CONT<=50 do
	 begin
	     CONT:=CONT+1;
	     write ('Digite o nome: ');
             read (NOME);
             write ('nota 1: ');
             read (N1);
             write ('nota 2: ');
             read (N2);
             write ('Nota 3: ');
             read (N3);
	     MEDIA:=(N1+N2+N3)/3;
	     if (MEDIA >= 6) then
	  	begin
	  		writeln('O aluno de nome ',NOME,' tem a média ',MEDIA,' em suas notas ');
	  	end
	     else
	  	writeln('REPROVADO');
	 end;
 end.

Como fazer o programa elaborado “Pascal Zim  Efeitos no Procedimento” feito em 2011 Aulas 4 de Pascal no compilador “Pascal Zim” Códigos simples aula para iniciantes.

Como usar o While no Pascal

Além disso, verifique

Adaptador de Rede Sem Fio USB TP-LINK [TL-WDN3200] – UNBOXING

Adaptador de Rede Sem Fio USB TP-LINK [TL-WDN3200] – UNBOXING

Veja nossa UNBOXING REVIEW do Adaptador de Rede Sem Fio USB TP-LINK [TL-WDN3200].   ● …