Составьте программу для решения следующей с использование - вопрос №2402213 от artem110616 06.11.2022 12:58

Question

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

artem110616 · Answer

Var i,n:integer;beginread (n);i:=0;for i:=1 to n do beginif  sqr(i) =n thenwriteln (sqr(i));end;end....