tema de Pascal: robot

Este programa parece ser muy simple. El siguiente programa ingresa comandos desde el teclado y los resultados se muestran en la pantalla. La pregunta requiere que usted mismo mejore la parte de entrada y salida del archivo, ¿está bien?

{$apptype?console}

programa?exp;

var?s:string;?x,y,i:integer;

comenzar x:=0; y:=0; readln(s); para?i:=1?a?longitud(es)?do case?s[i]?de

' N':y:=y+1;

'W':x:=x-1;

'S':y:=y-1;

'E':x:=x+1; end; writeln(x,'?',y);

end.

El programa pasó la depuración bajo DELPHI. Los resultados de ejecución son los siguientes:

E:\ygb>dcc32?a.dpr

Borland?Delphi?Version?15.0

Copyright?(c) ?1983, 2002?Borland?Software?Corporation

a.dpr(16)

17?líneas,?0,14?segundos,?11640?bytes?código,?1809?bytes ?datos

E:\ygb>a.exe

NWSSWWEES

-1?-2