Lenguaje P: La programación determina el número de días que han pasado este año y el número de días que quedan hoy. Imprime números del 1 al 100, diez números por línea.
var i:integer;
comenzar
para i:=1 a 100 hacer
comenzar
write(i:4);
si mod 10=0 entonces writeln
end;
end.