Программа в Паскаль Напишите программу, которая возводит введенное число в степень 10, используя только четыре операции умножения. Входные данные Входная строка содержит единственное вещественное число в диапазоне от 0 до 8. Выходные данные Нужно вывести 10-ю степень полученного числа с тремя знаками в дробной части.
program PowerOfTen;
var
num, result: real;
begin
write('Введите число: ');
readln(num);
result := num num num num num num num num num * num;
writeln('Результат: ', result:0:3);
end.