Разработать алгоритм и программу вычисления квадратов и кубов чисел от 0,1 до 1,...

0 голосов
57 просмотров

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


Информатика (61 баллов) | 57 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
// 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<br>    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

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

image
(150k баллов)