Выведите кубы несчетных целых чисел от 1 до 13 Паскаль

Выведите кубы несчетных целых чисел от 1 до 13 Паскаль

Задать свой вопрос
1 ответ

Ответ:

Var i:integer;

Begin

For i:=0 to 6 do

Write((i*2+1)*(i*2+1)*(i*2+1));

End.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт