Uses graphabc;
var
x: integer;
begin
setfontsize(35);
writeln('Введите двузначное число:');
SetFontColor(clblack);
SetFontSize(250);
window.IsFixedSize := true;
read(x);
clearwindow;
textout(0, 0, x);
end.
Program z10;
var a,b:real;
Begin
a:=1;b:=0;
while a<1024 do
begin
a:=a*2;
b:=sqrt(a+b);
end;
write(b);
<span>end.
2)
Program z10;
var w,j,p,i,k:longint;
x,s:real;
Begin
read(x);
s:=0;k:=10;
for i:=1 to k do
begin
p:=1;w:=3*i-1;
for j:=1 to w do
begin
p:=p*j;
end;
s:=s+x/p;
end;
write(s);
<span>end.
2-это 4</span></span>
1)Электронный импульс
2)(Тут легко сам придумай)Писать коды на самолетах бумажных и кидать в друг друга
3)Её надо защищать потомучто она владеет особой ценностью,особенно если её знает узкий круг людей.Чужой информацией может воспользоваться кто то ненадлежащим образом.
4)Контроль доступа, ограничение доступа,дублирование каналов связи
18446744073709551615 зерен
10713.782391753359 м сторона кубического амбара
#Ruby22
k=1
s=k
for i in 2..64
k *= 2
s += k
end
p s
p (s/15.0/10**6)**(1.0/3.0)