It's Pascal inspired but certainly not any of Wirth's syntaxes, like 1/2 line if's, semi colons in weird places making blocks look odd. Ada has a more inclusive syntax, whereby "is" or "begin" and "end" encases what is inside it. Compare Modula's:

    MODULE X;
        ...
    END MODULE X.

and Ada's:

    package X is
       ...
    end X;

Ada's package feels like one statement containing others, whereby Modula's looks like it ends on the first line.