51

Дан линейный массив А[1…

irina161983 25 июля 2022

Дан линейный массив А[1… N], содержащий целые числа. Получить те элементы массива, которые являются полнымиквадратами.

категория: информатика

82

vara: [1… 100] array of integer; i,n,p: integer; beginreadln (n); for i: =1 to n dobeginreadln (a[i]); p: =2; while (p*p <= a[i]) dobeginif p*p=a[i] then writeln (a[i],' полный квадрат') p: =p+1; end; end; end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...