Перевод с языка Паскаль в С
помогите пожалуйста перевести с языка паскаль в СИ:star2::grud:
var
a:array[1..n] of real;
s:real;
b:array[1..n] of real;
i:integer;
begin
for i:=1 to n do
begin
write ('a[',i,']=');
read (a);
end;
s:=0;
for i:=1 to n do;
s:=s=a;
s:=s/n;
for i:=1 to n do
b:=a-s;
writeln ('s=',s:6:2);
for i:=1 to n do
writeln ('b[',i,']=',b:6:2);
end.
помогите пожалуйста перевести с языка паскаль в СИ:star2::grud:
var
a:array[1..n] of real;
s:real;
b:array[1..n] of real;
i:integer;
begin
for i:=1 to n do
begin
write ('a[',i,']=');
read (a);
end;
s:=0;
for i:=1 to n do;
s:=s=a;
s:=s/n;
for i:=1 to n do
b:=a-s;
writeln ('s=',s:6:2);
for i:=1 to n do
writeln ('b[',i,']=',b:6:2);
end.