|
zadach153.BAS |
|
{* Задача153 *}REM basic ' Проверить равенство! 1^3 + 3^3 + 5^3 +...+ (2n - 1)^3 = n^2 (2n^2 - 1)INPUT "Введите n: ", n
L = 0
For I = 1 To n
A = (2 * I - 1)
L = L + A ^ 3
Next
R = (n ^ 2) * (2 * n ^ 2 - 1)
PRINT "Слева: "; L
PRINT "Справа: "; R
If R = L Then PRINT "Равенство верно" Else PRINT "Равенство ложно"
|