Вывести значения квадратного корня целых чисел в диапозоне от 1 до N. N-целое положительное число, введенное с клавиатуры. В паскале

Question

Лаврюня

27 апреля, 06:17

+2

Ответы (1)

Знаете ответ на вопрос?

Эдуард · Answer 1

Var N:integer;

Begin

Write ('N = ') ;

ReadLn (N) ;

For N: = 1 to N do

WriteLn ('√', N,' = ', Sqrt (N))

End.