Вывести точные квадраты натуральных чисел, не превосходящие данного числа Nна языке VBA

Question

Вывести точные квадраты натуральных чисел, не превосходящие данного числа N на языке VBA

Гость

Ответ(ы) на вопрос:

Accepted Answer

n = InputBox("n=?") For i = 1 To n s = s & i * i & "; " Next i MsgBox (s)