PascalВыведите все числа на отрезке от a до b…

PascalВыведите все числа на отрезке от a до b, являющиеся полными квадратами. Примеры: Входные данные 15Выходные данные 1 4

в избранное

chakls

01 августа 2022

Var a,b,i: integer; x: real; BeginReadln (a); Readln (b); If a<0 Then a: =1; For i: =a to b do Begin x: =sqrt (i); If frac (x)=0 Then Write (i,'); End; End.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Запиши слово звуками, а потом соедени каждое слова цифрой которое соответствует количеству звуков в этомслове

Напишите 5 свойств объектов операционной системы (Рабочий стол, мой компьютер, моидокументы)

Составить блок-схему и написать программу: Дано натуральное число

Пошаговые описание действий человекакак их называют

В коробке лежат 64 цветных карандаша. Сообщение о том, что достали белый карандаш, несет 4 бита информации

Приведите примеры пустого множества и множества состоящего из 10 элементов

Решите задачу: В классе 11100 (в двоичной системе) учеников и 15 (в восьмиричной системе) девочек

Помогите!) заранее спасибо!

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: