64 = 1000000
-120 = -1111000
-96 = -1100000
57 = 111001
Вот конвертер: http://whoyougle.ru/measure/hex/
В <span>байте 8 бит, 1 символ кодируется одним байтом, соответственно урок - 4 байт... Но это зависит от кодировки, в разных кодировках символ занимает разное количество байт.</span>
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
ReadlnString.ToUpper.Println('')
end.
<u><em>Тестовое решение:</em></u>
Это тестовая строчка
ЭТО ТЕСТОВАЯ СТРОЧКА
Var P,S,t,g:real;begin write('введите массу стола '); read(t); S:=100; g:=10; P:=(g*t)/S;write('давление на пол, создаваеммое столом равно ',P);end.
Visual BasicВыделить код
Option Explicit
Function Min_3(a As Variant, b As Variant, c As Variant) As Variant
Min_3 = a
If a > b Then Min_3 = b
If Min_3 > c Then Min_3 = c
End Function
Private Sub Form_Activate()
Dim a As Integer, b As Integer, c As Integer
a = Val(InputBox("Введите число"))
b = Val(InputBox("Введите число"))
c = Val(InputBox("Введите число"))
Print "Наименьшее из чисел " & a & ", " & b & ", " & c & " - число " & Min_3(a, b, c)
End Sub