Question

Язык Pascal. Напишите программу, которая позволяет вводить с клавиатуры целое число. Напишите программу, которая позволяет вводить с клавиатуры целое число и выводит на экран 4-ю, 6-ю и 8-ю степени числа. При вычислениях используйте минимальное количество действий. (Задачу выполнять без использования циклов)

Answer 1

Ответ:

может есть проще

Объяснение:

var

 a:integer;

 b,c,d:real;

begin

    writeln('Введите целое число');

   readln(a);

   b:=sqr(sqr(a));

   c:=b*sqr(a);

   d:=sqr(b);

  writeln(a+'^4 = ',+b);

  writeln(a+'^6 = ',+c);

  writeln(a+'^8 = ',+d);

 end.

Answer 2

Вот пример программы на языке Pascal, которая реализует указанную задачу:

program Powers;

var
  num: Integer;

begin
  // Ввод числа с клавиатуры
  Write('Введите целое число: ');
  Readln(num);

// Вывод 4-й степени числа
  WriteLn('4-я степень числа: ', num * num * num * num);

// Вывод 6-й степени числа
  WriteLn('6-я степень числа: ', num * num * num * num * num * num);

// Вывод 8-й степени числа
  WriteLn('8-я степень числа: ', num * num * num * num * num * num * num * num);

end.

Программа сначала запрашивает у пользователя ввод целого числа. Затем с использованием операции умножения вычисляет и выводит на экран 4-ю, 6-ю и 8-ю степени введенного числа. Обратите внимание, что чтобы минимизировать количество действий, мы используем операцию умножения только один раз для каждой степени.