на языке PACKAL
там начинается со слова програм и тд
есть ибеи?
д*
идеи есть. а есть ответ? (результат сравнить)

Ответы и объяснения

2014-02-13T19:51:03+04:00
Мб так?
PROGRAM work;
uses crt;
var n,b,s:real; a:integer;
Begin cls;
b:=2;
s:=0;
for a:=1 to 6 do
begin
n:=1/sqrt(b);
s:=s+n;
b:=b*10;
end;
writeln('Сумма = ',s);
End.
Не, 1 с небольшим получается. Исправил
1.03309207261954?
угу
отлично. у меня также получилось =)
const N=6;
var i:integer;
var x,y,s:real;
begin
cls;
y:=2;
s:=0;
for i:=1 to N do begin
x:=1/sqrt(y);
s:=s+x;
y:=y*10;
end;
write(s);
end.