var i:integer;
s:real;
begin
s:=0;
for i:=1 to 49 do
case i of
1..3:s:=s+i*i;
4..8:s:=s+i*i+i;
9..15:s:=s+i;
16..25:s:=s+i+sqrt(i);
26..49:s:=s+sqrt(i);
end;
write('s=',s:0:3);
end.
Помогите в С++ перевести
s:real;
begin
s:=0;
for i:=1 to 49 do
case i of
1..3:s:=s+i*i;
4..8:s:=s+i*i+i;
9..15:s:=s+i;
16..25:s:=s+i+sqrt(i);
26..49:s:=s+sqrt(i);
end;
write('s=',s:0:3);
end.
Помогите в С++ перевести
