Составьте программу вычисления y.y=корень

Var
X:real;
Begin
Write('X = ');ReadLn(X);
if X>12 then Write('Значение не определено')
else Write('Y = ',sqrt(12-X))
End.

Перевод целых десятичных чисел в любую другую системы счисления осуществляется делением числа на основание новой системы счисления (в нашем случае это 2) до тех пор, пока в остатке не останется число меньшее основания новой системы счисления. Новое число записывается в виде остатков деления, начиная с последнего.

Целая часть от деления Остаток от деления

68 div 2 = 34                        68 mod 2 = 0

34 div 2 = 17                        34 mod 2 = 0

17 div 2 = 8                         17 mod 2 = 1

8 div 2 = 4                         8 mod 2 = 0

4 div 2 = 2                         4 mod 2 = 0

2 div 2 = 1                         2 mod 2 = 0

1 div 2 = 0                   1 mod 2 = 1

Остаток от деления записываем в обратном порядке. Получаем целую часть числа в 2-ой системе счисления: 1000100

68 = 1000100(2)

Для перевода дробной части числа последовательно умножаем дробную часть на основание 2. В результате каждый раз записываем целую часть произведения.

0.25*2 = 0.5

(целая часть 0)

0.5*2 = 1

(целая часть 1)

0*2 = 0

(целая часть 0)

0*2 = 0

(целая часть 0)

0100

Получаем число в 2-ой системе счисления: 0100

0.25 = 0.0100(2).

В итоге получаем число: 1000100.0100(2)

ответ: 68.25=1000100.0100(2)

1.

использовать Чертежник

алг

нач

опустить перо

сместиться в точку (0,6)

сместиться в точку (6,6)

сместиться в точку (6,0)

сместиться в точку (0,0)

поднять перо

кон

2.

использовать Чертежник

алг

нач

сместиться в точку (-7,0)

опустить перо

сместиться на вектор (2,5)

поднять перо

сместиться на вектор (2,-5)

опустить перо

сместиться на вектор (2,5)

поднять перо

сместиться в точку (2,0)

опустить перо

сместиться на вектор (2,5)

поднять перо

сместиться на вектор (2,-5)

опустить перо

сместиться на вектор (2,5)

поднять перо

кон

Объяснение:

скрины