Program z1;
var s,k:longint;
Begin
Readln(s);
k:=trunc(sqrt(s));
Writeln(k);
End.
Var x,a,s:real; i,n:integer;
begin
write('x = '); readln(x);
write('n = '); readln(n);
s:=0;
a:=-1;
for i:=1 to n do
begin
a:=-a*x;
s:=s+a/i;
end;
writeln('s = ',s);
end.
Пример:
x = 0.5
n = 4
s = 0.401041666666667
Раньше люди жили без телевизоров телефонов отчитали из книги когда нечего было делать этим развивались.
Процессор! Т.К все остальные устройства-- накопители
137 438 953 472 байт = 137438953472/1024 Кбайт = 134 217 728 Кбайт =
134 217 728/1024 Мбайт = 131 072 Мбайт = 131 072/1024 Гбайт = 128 Гбайт
Если делить не на 1024, а на 1000, то получится ≈ 137,5 Гбайт
А конфликт довольно простой - с точки зрения потребителя на изделии указан неверный объем диска.