Листинг программы и скриншот результата в приложениях.
Написано на PascalABC.NET но должно работать на всех Паскалях.
<span>d)if (x>y) and (y>z) then a:=x+y+z</span>
1 точка=1пиксель кол-во пикселей зависит от разрешения пиксель это и есть точка
1.4
2.2
3.2
4.2
5.1
6.2
7.4
8.3
9.2
10.2
11.3
12.4
13.2
14.1
15.1
16.2
17.3
18.1
19.4
20.3