Пример выполнения контрольной работы части 3

1)Выполнить последовательный перевод данных (десятичных) чисел в двоичную и шестнадцатеричную системы счисления:

567,0023; 234,761

567,0023₍₁₀₎=1000110111,000000001₍₂₎

567|_2

1. 283|_2

1. 141|_2

1. 70|_

0. 35|_2

1 17|_2

1 8|_2

0 4|_2

0 2|_2

0. 1

_X0,0023

2

_X 0,0046

2

_X 0,0092

2

_X 0,0184

2

_X 0,0368

2

_X 0,0736

2

_X 0,1472

2

_X 0,2944

2

_X 0,5888

2

1,1776

567,0023₍₁₀₎=1000110111,000000001₍₂₎= 0010|0011|0111,0000|0000|1000₍₂₎=237,008₍₁₆₎

2)Выполнить последовательный перевод данных (шестнадцатеричных) чисел в двоичную и десятичную системы счисления:

AB233,E2; AAC34,A3

AB233,E2₍₁₆₎=10101011001000110011,1110001₍₂₎=1*2¹⁹+0*2¹⁸+1*2¹⁷+0*2¹⁶+1*2¹⁵+0*2¹⁴+1*2¹³+1*2¹²+0*2¹¹+0*2¹⁰+1*2⁹+0*2⁸+0*2⁷+0*2⁶+1*2⁵+1*2⁴+0*2³+0*2²+1*2¹+1*2⁰+1*2 ^-1 +1*2 ^-2+1*2^-3+0*2^-4+

+0*2^-5+0*2-⁶+1*2^-7=524288+131072+32768+8192+4096+512+32+16+2+1+0,5+0,25+0,125+0,0078= =700979,8828₍₁₀₎

3)Произвести сложение с проверкой вычитанием:

₊11010111,1101 110100011,1010

11001011,1101 -11001011,1101

=110100011,1010 =11010111,1101

Пример выполнения части 4

1. Даны действительные числа . Получить max(a₁+ a₁₆, a₂+ a₁₅,…, a₈+ a₉) .

Схема алгоритма к заданию №1.

program ссс1;

var i: integer;

a: array[1..16] of real;

b: array[1..7] of real;

max: real;

begin

writeln('vvod chisel');

for i:=1 to 16 do

begin

readln(a[i]);

end;

max:= a[1]+a[16];

for i:=1 to 7 do

begin

b[i]:= a[i]+a[16-i+1];

if max<b[i] then

max:=b[i];

end;

writeln('max:');

writeln(max);

readln;

end.

vvod chisel

1 4 6 34 87 56 21 45 22 65 2 13 56 73 25 6

max: 100

52