50 ! напечатать таблицу значений функции y=x^3 на отрезке [-1; 1] с шагом 0.1.паскаль..

Var
  x,y:real;
begin
  x:=-1;
  while x<=1 do begin
    Writeln('x=',x:4:1,',  y=',x*x*x:9:6);
    x:=x+0.1
  end
end.

Результат выполнения программы:
x=-1.0,  y=-1.000000
x=-0.9,  y=-0.729000
x=-0.8,  y=-0.512000
x=-0.7,  y=-0.343000
x=-0.6,  y=-0.216000
x=-0.5,  y=-0.125000
x=-0.4,  y=-0.064000
x=-0.3,  y=-0.027000
x=-0.2,  y=-0.008000
x=-0.1,  y=-0.001000
x= 0.0,  y= 0.000000
x= 0.1,  y= 0.001000
x= 0.2,  y= 0.008000
x= 0.3,  y= 0.027000
x= 0.4,  y= 0.064000
x= 0.5,  y= 0.125000
x= 0.6,  y= 0.216000
x= 0.7,  y= 0.343000
x= 0.8,  y= 0.512000
x= 0.9,  y= 0.729000
x= 1.0,  y= 1.000000

chk = True

a = float(input('Введите длину всего участка (км): '))

b = float(input('Введите ширину всего участка (км): '))

c = float(input('Введите периметр квадрата с аттракционами (км): '))

d = float(input('Введите площадь дендропарка (кв.км): '))

print()

if c/4 > a/2 and c/4 > b/2:

   print('Участок с аттракционами не помещается на выделенной площади!')

   chk = False

if d > a*b/2 + (c/4)**2:

   print('Участок с дендропарком не помещается на выделенной площади!')

   chk = False

if chk == True:

   print('Площадь зоопарка =', round(a*b/2,2), ' кв.км')

   print('Площадь дендропарка =', d, ' кв.км')

   print('Площадь участка с вттракционами =', round((c/4)**2,2), ' кв.км')

   print('Оставшаяся площадь =', round(a*b/2 - (c/4)**2 - d,2), ' кв.км')

#include <iostream>
using namespace std;
typedef unsigned short int USI;

USI DigitCount(USI n) {
USI a = (int) n / 100,
bc = n % 100,
b = (int) bc / 10,
c = n % 10;
if (a > 0) return 3;
if (b > 0) return 2;
if (c > 0) return 1;
return 0;
}

USI SumDigits(USI n, USI dc) {
USI sum = 0,
a,
bc,
b,
c;
switch (dc) {
case 3:
a = (int) n / 100;
sum += a;
case 2:
bc = n % 100;
b = (int) bc / 10;
sum += b;
case 1:
c = n % 10;
sum += c;
break;
default:
return 0;
break;
}
return sum;
}

USI LastDigit(USI n) {
return n % 10;
}

USI FirstDigit(USI n, USI dc) {
switch (dc) {
case 1:
return n;
break;
case 2:
return (int) n / 10;
break;
case 3:
return (int) n / 100;
break;
default:
return 0;
break;
}
}

int main() {
USI n;
cout << "n = ";
cin >> n;
USI dc = DigitCount(n);
cout << "Число " << n
<< ":\n"
<< "Цифр: "
<< dc << '\n'
<< "Сумма цифр: "
<< SumDigits(n, dc) << '\n'
<< "Последняя цифра: "
<< LastDigit(n) << '\n'
<< "Первая цифра: "
<< FirstDigit(n, dc) << '\n';
return 0;
}