Cod sursa(job #3997)

Utilizator cascadaDragomir Elena cascada Data 29 decembrie 2006 23:52:27
Problema Semne Scor 0
Compilator fpc Status done
Runda Arhiva de probleme Marime 0.14 kb
program elena;
var a,n,s:integer;
uses crt;
begin
writeln('n=');readln(n);
writeln('s=');readln(s);
for a to n do
write s:=+mod n; 
end.