Составьте программу для решения следующей с использование - вопрос №2402213 от vvv76 10.10.2022 06:48

Question

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

vvv76 · Answer

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