Pascal/Turbo Pascal - Ayuda con un programa de pascal

   
Vista:

Ayuda con un programa de pascal

Publicado por alex (2 intervenciones) el 24/11/2008 00:31:16
Se almacena un valor entero no nulo en la variable n. Completar el siguiente programa para que se asigne a la variable k el mayor divisor de n positivo distinto de n. Para n=1 ó n=-1 el mayor divisor es uno.


Me dan lo siguiente
var k,n:integer;
begin {aseguramos que n tiene un valor no nulo}
repeat readln(n) until n<>0;

escribir codigo

writeln('el mayor divisor es',k);
end.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder