Question

Возвести в 6 степень введенное число через цикл (использовать тип longint при необходимости).по паскалю

Answer 1

var num, deg: integer;res: real;i: byte;begin write('Число: ');  readln(num); deg:=6; res := 1; i := 0; while i < abs(deg) do begin  res := res * num;  i := i + 1 end; if deg < 0 then  res := 1 / res;  writeln(res); readlnend.

0428b88399140cc22ed10ed51e3bc6bc.txt

Answer 2

а можете решить еще одну задачу подобную? пожалуйста

Answer 3

Конечно

Answer 4

Организовать вывод значений с точностью до двух чисел после запятой (например, в записи writeln(‘a=’,a:5:2) будет выведено всего 5 цифр на все число, и 2 цифры после запятой):(x3-3/x)*1,5

Answer 5

так же через паскаль