Информатика_всем

Теперь кодовые комбинации 1, 2, 3 переносятся в столбец «Шаг 3» в

неизменном виде, а код 0, который соответствует четырем «склеенным» вероятностям, уточняется дополнительным символом 0, 1, 2, 3.

Аналогичным образом на шаге 2 получается следующая таблица.

9

Аналогичным образом на шаге 1 получается следующая таблица.

И окончательно получаем

10

3. СИСТЕМЫ СЧИСЛЕНИЯ

Номер студенческого билета (последние четыре цифры) в прямом и обратном порядке перевести в двоичную, восьмеричную, шестнадца-

теричную систему. Произвести сложение и вычитание полученных значений.

Решение.

Пусть номер студенческого билета 20112010. Последние четыре цифры 2010 в обратном порядке 102.

Переведем числа в двоичную систему исчисления: 201010=214∙0+213∙0+212∙0+211∙0+210∙1+29∙1+28∙1+27∙1+26∙1+25∙0+24∙1+23∙1

++22∙0+21∙1+20∙0 = 111110110102.

10210=214∙0+213∙0+212∙0+211∙0+210∙0+29∙0+28∙0+27∙0+26∙1+25∙1+24∙0+23∙0+ +22∙1+21∙1+20∙0 = 11001102.

Переведем числа в восьмеричную систему исчисления: 201010=85∙0+84∙0+83∙3+82∙7+81∙3+80∙2 = 37328. 10210=85∙0+84∙0+83∙0+82∙1+81∙4+80∙6 = 1468.

Переведем числа в шестнадцетиричную систему исчисления: 201010=164∙0+163∙0+162∙7+161∙13+160∙10 = 7DA16. 10210=164∙0+163∙0+162∙0+161∙6+160∙6 = 6616.

11

Произведем сложение в каждой из систем исчисления:

201010+ 10210 = 211210,

111110110102+11001102=1000010000002,

37328+1468= 41008 7DA16 + 6616 = 84016.

Произведем вычитание в каждой из систем счисления (из большего

числа вычтем меньшее):

201010 – 0,010210 = 190810,

111110110102–11001102=111011101002,

37328–1468= 35648 7DA16 – 6616 = 77416.

4. ЛИНЕЙНЫЕ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ

Вычислить значение X при различных значениях аргументов:

12

Б л о к - с х е м а к з а д а ч е № 4

Y:=Y1/Y2

X:= e BA sin Y cos Y

Вывод X

Конец

Л и с т и н г п р о г р а м м ы н а P a s c a l

program z4; var

A,B,C,X,Y,Y1,Y2 : real; begin

// ввод данных writeLn('введите A, B, C'); readLn(A,B,C);

//вычисление промежуточных данных

//сначала числитель

Y1:=sqrt(sqr(A)+sqr(B))/(0.5 + A*B) - 1/A;

// потом знаменатель

13

Y2:=C+abs(A-B);

// потом их отношение

Y:= Y1/Y2;

//теперь всю формулу:

X:= exp(-A/B)*(sin(Y)+cos(Y));

//вывод результата writeLn(' X= ' , X);

end.

5. ПРОСТЫЕ РАЗВЕТВЛЯЮЩИЕСЯ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ

Ввести число X, выяснить, что больше: целая часть числа x, или его дробная часть, умноженная на 10. Если первое, то число разделить на 10, если второе, то дробную часть от него отнять.

Б л о к - с х е м а к з а д а ч е № 5

Вывод z

Вывод X

1

Конец

14

Л и с т и н г п р о г р а м м ы н а я з ы к е P a s c a l к з а д а ч е № 5

program Z5; var x,y,z:real; begin

writeLn('введите x'); readLn(x);

// рассчитываем целую часть y:=trunc(x);

writeLn('целая часть числа равна ', y);

// рассчитываем дробную часть z:=frac(x);

writeLn('дробная часть числа равна ', z);

// проверка условия if y>z*10 then

begin

writeLn('целая часть больше'); x:=x*10;

end else

begin

writeLn('дробная часть, умноженная на 10,

больше');

writeLn('удесятеренная дробная часть равна

',z*10);

x:=x-z; end;

writeLn('число после изменения x=',x); end.

15

6. СЛОЖНЫЕ РАЗВЕТВЛЯЮЩИЕСЯ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ

Ввести четырехзначное число, выяснить, равны ли первая и последняя цифра в его записи. Если цифры равны и четны, то разделить их на два. Если цифры не равны и первая цифра больше последней, то поменять их местами. Если цифры не равны и первая цифра меньше последней, то поменять местами вторую и третью цифры.

Б л о к - с х е м а к з а д а ч е № 6

16

Л и с т и н г п р о г р а м м ы н а я з ы к е P a s c a l к з а д а ч е № 6

Program Z6;

var X,Y,x1,x2,x3,x4: integer; begin

cls;

writeLn('Введите четырехзначное число'); readLn(X);

//чтобы не потерять исходное число,

//копируем его в Y

Y:=X;

17

x1:=Y div 1000; // первая цифра

Y:= Y mod 1000; // отбрасываем первую цифру

end else

18