Question

Разработать алгоритм и программу вычисления квадратов и кубов чисел от 0,1 до 1, задаваемых с шагом 0,05. Результат выдать на экран в виде таблицы:
X X2 X3
паскаль

Answer 1

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!

begin
  Writeln('x      x^2      x^3');
  var x:=0.1;
  while x<=1.01 do begin
    Writeln(x:4:2,x*x:7:3,x*x*x:10:6);
    x+=0.05
    end
end.

Результат
x      x^2      x^3
0.10  0.010  0.001000
0.15  0.023  0.003375
0.20  0.040  0.008000
0.25  0.063  0.015625
0.30  0.090  0.027000
0.35  0.123  0.042875
0.40  0.160  0.064000
0.45  0.203  0.091125
0.50  0.250  0.125000
0.55  0.303  0.166375
0.60  0.360  0.216000
0.65  0.423  0.274625
0.70  0.490  0.343000
0.75  0.563  0.421875
0.80  0.640  0.512000
0.85  0.723  0.614125
0.90  0.810  0.729000
0.95  0.903  0.857375
1.00  1.000  1.000000

Настоящий вид вывода показан во вложении.