Diferencia entre revisiones de «Pascal (lenguaje de programación)»
Contenido eliminado Contenido añadido
m Revertidos los cambios de 189.162.210.114 a la última edición de Giudicejesica |
|||
Línea 100:
readln(n);
while n<>0 do
if (n mod 3)=0 then
begin
x:=x+1;
|