Среди натуральных трехзначных чисел вывести те, сумма квадратов цифр которых равно 14

Var
   A:integer;
Begin
For A:= 100 to 999 do
    if Sqr(A div 100)+Sqr((A div 10) mod 10)+Sqr(A mod 10) = 14 then
       Write(A,' ')
End.

Результат работы программы:
123 132 213 231 312 321

1. В)

2. Б)

3. Г)

4. Б)

5. А), В)

6. Г)

7. А) животные, Б) одежда, В) слова, Г) деревья, Д)кисломолочные продукты, Е) цифры.

8. Ещё подумаю

9. 1) макароны, 2) песня, 3) песок, 4)шарф.

10. Например: 1) 5; 2) 5×5=25; 3)25×2=50; 4) 50+4=54; 5) 54-8=46; 6) 6; 7) 6×7=42; 8) 42:2=21 и 1) 3; 2) 3×5=15; 3) 15×2=30; 4)30+4=34; 5)34-8=26; 6) 6; 7)6×7=42; 8)42:2=21

Вывод: если взять любое число кроме нуля и выполнить с ним эту последовательность действий, то получается одно и тоже число-21.

11. 1) Раньше всех пришла лиса.

2) 1 - Лиса, 2 - медведь, 3 - заяц, 4 - волк, 5 - сорока.

12. Вариант - 1

1. В ведро вместимостью 8 л налить 5 л.

2. В банку вместимостью 5 л налить 2 л.

Вариант - 2

Ведро вместимостью 8 л налить 7 л.

Будет нарисовано что то типа заглавной буквы "Д" но только у неё правая нижняя палочка не оттуда растёт немного.

Подробнее- смотри скрин внизу (жирная линия на скрине- это так отображается рисующее перо Чертёжника, его в принципе можно увести в другое место в конце алгоритма, чтобы оно там не мешалось, только предварительно подняв перо).

Вот ваша программа (в полном нормальном виде для системы Кумир, без кучи всяких мелких ошибок типа точки вместо запятой и больших букв там где не надо):

использовать Чертежник

алг

нач

сместиться в точку (1,1)

опустить перо

сместиться в точку (1,2)

сместиться в точку (5,2)

поднять перо

сместиться в точку (5,1)

опустить перо

сместиться в точку (4,2)

сместиться в точку (4,5)

сместиться в точку (3,5)

сместиться в точку (2,4)

сместиться в точку (2,2)

кон

А вот я поправил программу, чтобы она рисовала правильную букву "Д",  и ещё после уводила перо в сторону, чтобы оно не мешало смотреть рисунок. Результат работы этой программы- смотри на втором скрине.

использовать Чертежник

алг

нач

сместиться в точку (1,1)

опустить перо

сместиться в точку (1,2)

сместиться в точку (5,2)

сместиться в точку (5,1)

поднять перо

сместиться в точку (4,2)

опустить перо

сместиться в точку (4,5)

сместиться в точку (3,5)

сместиться в точку (2,4)

сместиться в точку (2,2)

поднять перо

сместиться в точку (7,2)

кон