Запишите в десятичной системе счисления числа a^3=121 ​

12 3 4 5 6 7 8 9 10 11 12 13 uses   crt; var   s : real;   i ,n : integer; begin readln (n ); s : = 0; for i : =1 to n do   s : =s + ( exp ( ln (3 ) / exp ( ln (2 ) *i ) ) ); writeln (s /n ); readkey end.

 

200: 2

100|0

50|0

25|0

12|1

6|0

3|0

1|1

0|1

 

200₁₀=11001000₂

 

489: 2

244|1

122|0

61|0

30|1

15|0

7|1

3|1

1|1

0|1

 

489₁₀=111101001₂

 

543: 2

271|1

135|1

67|1

33|1

16|1

8|0

4|0

2|0

1|0

0|1

 

543₁₀=1000011111₂

 

950: 2

475|0

237|1

118|1

59|0

29|1

14|1

7|0

3|1

1|1

0|1

 

950₁₀=1110110110

 

1025: 2

512|1

256|0

128|0

64|0

32|0

16|0

8|0

4|0

2|0

1|0

0|1

 

1025₁₀=10000000001₂

 

 

 

импликация  — бинарная логическая связка, по своему применению приближенная к союзам «если… то…».

импликация записывается как посылкаследствие; применяются также стрелки другой формы и направленные в другую сторону (остриё всегда указывает на следствие).

суждение, выражаемое импликацией, выражается также следующими способами:

посылка является условием, достаточным для выполнения следствия; следствие является условием, необходимым для истинности посылки.                        x={"студент сдаст хорошо сессию"} y={"папа купит ему машину"}. однако, это не совсем удачная иллюстрация, потому что как-то не близка к действительности. напомню, что x-> y == 0 только в том случае, если студент действительно хорошо сдал сессию, а папа машину ему не купил (наоборот, если студент сдал плохо, а папа купил ему машину, то папу лжецом уж точно не назовёшь).

  вот первая программа. вторую сейчас пишу.

program p_1; var a,b: string; i,k: integer; begin k: =0; write('введите слово '); readln(a); write('введите символ '); readln(b); for i: =1 to length(a) do begin if a[i]=b then k: =k+1; if a[i]=b then writeln(i,' '); end; if k> =1 then writeln('да, встречается ',k,' раз, на позиции указанных сверху в столбик ')else writeln('нет'); end.