Esda

помогите пожалуйста перевести с языка паскаль в СИ
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[i]);
end;
s:=0;
for i:=1 to n do;
s:=s=a[i];
s:=s/n;
for i:=1 to n do
b[i]:=a[i]-s;
writeln ('s=',s:6:2);
for i:=1 to n do
writeln ('b[',i,']=',b[i]:6:2);
end.

Vladimir_S

В Сети предлагается довольно много конвертеров с таким функционалом. Поищите. Но самый правильный совет, мне кажется, дал один программист. Суть: все конвертеры где-то да глючат, а потому самое лучшее — учите оба языка.
Успехов!