Skip to content

Instantly share code, notes, and snippets.

@Kanol

Kanol/gist:8109af4e979056a911e7

Created February 19, 2015 18:19
Show Gist options
  • Save Kanol/8109af4e979056a911e7 to your computer and use it in GitHub Desktop.
Save Kanol/8109af4e979056a911e7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.pas
Program n1;
var a, b, c, d:real;
begin
while 1>0 do begin
readln(a);
b:=b+1;
c:=c+a;
d:=c/b;
writeln(d);
end;
end.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment