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

Ответы 1

  • Ответ:

    Var i:integer;

    Begin

    For i:=0 to 6 do

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

    End.

    • Автор:

      barnes
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years