Другие языки программирования и технологии

Пожалуйста помогите решить задачу в Паскале.

Дано натуральное число N среди чисел 1,2...,N найти все те, которые можно представить в виде суммы квадратов двух натуральных чисел, определить процедуру позволяющую распозновать полные квадраты. Заранее Спасибо!
Пиши в личку.
Программа есть.
Введите N = 100
Число 1 - является полным квадратом
Число 2 представлено суммой квадратов 1^2 + 1^2 = 1 + 1
Число 4 - является полным квадратом
Число 5 представлено суммой квадратов 1^2 + 2^2 = 1 + 4
Число 8 представлено суммой квадратов 2^2 + 2^2 = 4 + 4
Число 9 - является полным квадратом
Число 10 представлено суммой квадратов 1^2 + 3^2 = 1 + 9
Число 13 представлено суммой квадратов 2^2 + 3^2 = 4 + 9
Число 16 - является полным квадратом
Число 17 представлено суммой квадратов 1^2 + 4^2 = 1 + 16
Число 18 представлено суммой квадратов 3^2 + 3^2 = 9 + 9
Число 20 представлено суммой квадратов 2^2 + 4^2 = 4 + 16
Число 25 - является полным квадратом
Число 25 представлено суммой квадратов 3^2 + 4^2 = 9 + 16
Число 26 представлено суммой квадратов 1^2 + 5^2 = 1 + 25
Число 29 представлено суммой квадратов 2^2 + 5^2 = 4 + 25
Число 32 представлено суммой квадратов 4^2 + 4^2 = 16 + 16
Число 34 представлено суммой квадратов 3^2 + 5^2 = 9 + 25
Число 36 - является полным квадратом
Число 37 представлено суммой квадратов 1^2 + 6^2 = 1 + 36
Число 40 представлено суммой квадратов 2^2 + 6^2 = 4 + 36
Число 41 представлено суммой квадратов 4^2 + 5^2 = 16 + 25
Число 45 представлено суммой квадратов 3^2 + 6^2 = 9 + 36
Число 49 - является полным квадратом
Число 50 представлено суммой квадратов 1^2 + 7^2 = 1 + 49
Число 50 представлено суммой квадратов 5^2 + 5^2 = 25 + 25
Число 52 представлено суммой квадратов 4^2 + 6^2 = 16 + 36
Число 53 представлено суммой квадратов 2^2 + 7^2 = 4 + 49
Число 58 представлено суммой квадратов 3^2 + 7^2 = 9 + 49
Число 61 представлено суммой квадратов 5^2 + 6^2 = 25 + 36
Число 64 - является полным квадратом
Число 65 представлено суммой квадратов 1^2 + 8^2 = 1 + 64
Число 65 представлено суммой квадратов 4^2 + 7^2 = 16 + 49
Число 68 представлено суммой квадратов 2^2 + 8^2 = 4 + 64
Число 72 представлено суммой квадратов 6^2 + 6^2 = 36 + 36
Число 73 представлено суммой квадратов 3^2 + 8^2 = 9 + 64
Число 74 представлено суммой квадратов 5^2 + 7^2 = 25 + 49
Число 80 представлено суммой квадратов 4^2 + 8^2 = 16 + 64
Число 81 - является полным квадратом
Число 82 представлено суммой квадратов 1^2 + 9^2 = 1 + 81
Число 85 представлено суммой квадратов 2^2 + 9^2 = 4 + 81
Число 85 представлено суммой квадратов 6^2 + 7^2 = 36 + 49
Число 89 представлено суммой квадратов 5^2 + 8^2 = 25 + 64
Число 90 представлено суммой квадратов 3^2 + 9^2 = 9 + 81
Число 97 представлено суммой квадратов 4^2 + 9^2 = 16 + 81
Число 98 представлено суммой квадратов 7^2 + 7^2 = 49 + 49
Число 100 - является полным квадратом
Число 100 представлено суммой квадратов 6^2 + 8^2 = 36 + 64
ВШ
Василий Шепелев
82 212
Лучший ответ
хыы пиши в личку
Игорь Глова
Игорь Глова
1 677