ejemplos en lenguaje Pascal

#1

PROGRAMA QUE SIRVE PARA CALCULAR EL PROMEDIO DE 3 CALIFICACIONES.

 

 

Program promedio;                                                                           Uses crt;                                                                                                       Var a, b, c, p: real;                                                                                                 Begin

Clrscr;                                                                                                      Writeln (‘este programa sirve para calcular el promedio’);     writeln;                                                                                             writeln (‘escribe 3 calificaciones:’);                                                              readln (a, b, c);                                                                                                                s:= a+b+c;                                                                                              p:= s/5;                                                                                    writeln (‘promedio=’,p:7:2);                                                           readln;

end.

 

 

 

 

 

 

 

#2

LEER UN ENTERO MULTIPLICARLO POR DOS Y ESCRIBIR EL RESULTADO EN PANTALLA.

 

 

Program multiplicar;                                                                              uses crt;                                                                                                    Var a, mul :integer;                                                                                  Begin

Clrscr;                                                                                                   Writeln (‘este programa sirve para multiplicar dos numeros       enteros’);                                                                                             writeln;...