var
seg,min,segs:numerico
inicio
cls ()
imprimir ("/n introduce los segundos");
leer (seg)
min = seg/60
imprimir ("/n los minutos son ", min,"");
segs = seg/min
imprimir ("/n los segundos que faltan son ",segs,"")
fin
ya calcule es tiempo..... pero de hay no se que hacer para que me diga...