Составьте программу для решениясоставьте программу - вопрос №2428225 от vfffffffff 21.05.2022 17:03

Question

Информатика: Составьте программу для решениясоставьте программу для решения следующей с использование цикла с предусловием: «выведите все точные квадраты натуральных чисел, не превосходящие данного числа n».

vfffffffff · Answer

Var n,i:integer;beginread (n);for i:=1 to n doif sqr(i) =n then writeln (sqr(i));end....