Actividad 5

Actividad 1     Resume las ideas esenciales  (Presentar resumen con las ideas esenciales)

Completa cada programa para introducirlo a la computadora. Indica la parte faltante y las modificaciones al programa para cumplir la función indicada.

¿Cuál será el programa que imprima los números 15,20,25,30, …150 con la proposición WHILE?

cont:=____;

While _____<100 do

Begin

  cont:=cont+____;

  writeln(cont)

End;

Readln;

End.

¿Proponga un programa que acepte números e imprima los numero impares, el programa terminara cuando se introduzca el número -999?

num:=___;

While num=-___ do

Begin

Writeln(‘introduce numero’);

 Readln(num);

If num mod  ____ =1 then

  Writeln(‘el numero’,num,’ es impar ‘);

End;