Dev - C++ - ¿Como estaria reescribido con ciclos for y do-while?

Filtrado por el usuario: ramon

Filtrado por el usuario 'ramon' (Eliminar fitro)

Error en calcular varios aximos pascal.

Necesito que alguien me brinde apoyo en realizar un programa en Pascal por favor, soy nuevo en esto.