Найти все трехзначные числа, которые можно представить разностью между квадратом числа - VB

Узнай цену своей работы

Формулировка задачи:

Найти все трехзначные числа, которые можно представить разностью между квадратом числа, образованного первыми двумя цифрами и квадратом третьей цифры

Решение задачи: «Найти все трехзначные числа, которые можно представить разностью между квадратом числа»

textual
Листинг программы
  1. Sub bb()
  2. Dim i&, j&
  3. For i = 10 To 99
  4.     For j = 0 To 9
  5.         If i * i - j * j = 10 * i + j Then Debug.Print i & j
  6.     Next
  7. Next
  8. End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы