Question

Составьте программу которая возводит число X в восьмую степень.
Даю 40 очков.

Answer 1

var a:integer;
a:=strtofloat(edit1.text);
a:=a*а*а*а*а*а*а*а;
label1.text:= floattostr(a);

Answer 2

Огрызок из Дельфи/Лазаруса ?

Answer 3

делфи , почему ты решил что это отгрызок?

Answer 4

Огрызок потому, что есть ссылки на поля Edit и Label, и нет кода форма, в котором прописывается этот текст. Т.е. нельзя просто открыть тот же Дельфи, всунуть в него эти 4 строки и запустить.

Answer 5

x⁸ = ( (x²)² )²

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var x8:=Sqr(Sqr(Sqr(ReadReal('x='))));
  Writeln('x^8=',x8)
end.

Пример
x= 3.17
x^8=10197.0394089246