Написать программы в delphi для возведения числа в степень.

Function pow(x, y: real): real; var   powtmp: real; begin   if (x < 0) then      powtmp : = (-1) * exp(y * ln(abs(    else if (x > 0) then      powtmp : = exp(y * ln(abs(    else powtmp : = 0;     if not (odd(round( then powtmp : = abs(powtmp);     if (y = 0) then powtmp : = 1;     pow : = powtmp;   end; вот функция, приклейте, куда нужно: )

Метод prompt() предназначен для вывода диалогового окна с сообщением, текстовым полем для ввода данных и кнопками «ОК» и «Отмена». Это окно предназначено для запроса данных, которые пользователю нужно ввести в текстовое поле.В переменную result возвращается значение введённое пользователем или null. Если пользователь не ввёл данные (поле ввода пустое) и нажал на «ОК», то в result будет находиться пустая строка.

Например, запросим имя пользователя при входе его на сайт с prompt, а затем выведем его в элемент #welcome:

хотела

1. Для определения информационного веса одного символа используем формула N =

1)

i = 3 бита

То есть в алфавите, состоящем из 8 букв, один символ занимает 3 бита.

2)

i = 5 бит

В алфавите, состоящем из 32 букв, один символ занимает 5 бит.

3)

i = 6 бит

В алфавите, состоящем из 40 букв, один символ занимает 6 бит.

1) 3 бита

2) 5 бит

3) 6 бит

2. Для нахождения объема стереоаудиофайла используем формулу:

Объём = стерео * время * част. дискр. * разрешение

Объём = 2 * 45 * 44,1 * 1000 * 16 = 63 504 000 бит = 7 938 000 байт = 7 751,95 Кбайт = 7,57 Мбайт

ответ: 7,57 Мбайт

3. Похоже на первое задание, только нам нужно совершить действия наоборот:

1) 17

i = 5 бит

По этой же схеме проделаем следующие задания:

2) 64 букв: 6 бит

3) 257 букв: 9 бит

4) 300 букв: 9 бит

5) 1000 букв: 10 бит