729 728 364 182 91 90 45 44 22 21 20 19 18 17
1 1 1 1 1 2 1 2 1 2 2 2 1
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var x:=ReadReal;
write(sqrt(x+1));
end.
1) - это те действия, которые объект может выполнить сам, или же, посредством другого объекта.
2) - это те же действия, но, которые выполняются над самим объектом.
3) - это совокупность всех его свойств и значений этих свойств.
Переведём 31 в другие системы, начиная с двоичной
31_10 = 11111_2 = 1011_3 = 133_4 = 111_5 = 51_6 = 43_7
---------------
Остаток от деления 32 на n
n - остаток
<span><span><span>
5
2
</span>
<span>
6
2
</span>
<span>7
4
</span>
<span>
8
0
</span>
<span>
9
5
</span>
<span>
10
2
</span>
<span>
11
10
</span>
<span>
12
8
</span>
<span>
13
6
</span>
<span>14
4
</span>
<span>
15
2
</span>
<span>
16
0
</span>
<span>
17
15
</span>
<span>18
14
</span>
<span>
19
13
</span>
<span>
20
12
</span>
<span>
21
11
</span>
<span>
22
10
</span>
<span>
23
9
</span>
<span>
24
8
</span>
<span>
25
7
</span>
<span>
26
6
</span>
<span>
27
5
</span>
<span>28
4
</span>
<span>
29
3
</span></span></span>
-------
65_8 = 53_10 = 1 + n +3n^2
<span>3 n^2 + n - 52 = 0
</span>n=4
Сами значения вычислить понятно как. Пусть будет шаг h:=0.1
var a, b, h, x, y: real
BEGIN
a := -10; b := 10; h := 0.1;
x := a;
while (x <= b) do
begin
y:=1/(x*x*x);
Draw(x, y); // Это подпрограмма рисования точки с координатами (x, y)
x:= x+h;
end;
END.
А вот как в паскале рисовать на экране, я не знаю.
Подпрограмму Draw я оставляю ненаписанной.
