• Вывести на экран квадраты и кубы целых чисел от 1 до 8.
    Паскаль.
    Помогите пожалуйста,ничего не понимаю :(

Ответы 3

  • Так-то чётные числа тоже целые. Программа выводит только результаты нечётных.
  • Следственно строчка if i mod 2 <>0 then не нужна.
    • Автор:

      mayo3
    • 6 лет назад
    • 0
  • vari:integer;beginfor i:=1 to 8 doif i mod 2 <>0 thenwriteln('Число ',i,' Квадрат ',i*i,' Куб ',i*i*i);end.
    • Автор:

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

Войти через Google

или

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

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

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