ada/DB.mephi_ada
1
0
Fork 0
mirror of https://github.com/ada-dmitry/DB.mephi_ada.git synced 2026-09-24 08:00:16 +00:00
Code Issues Packages Projects Releases Wiki Activity

reboot rep

Browse Source
This commit is contained in:
ada-dmitry
2024-02-15 15:29:30 +03:00
parent 2360cb388f
commit 4623603411
25 changed files with 505 additions and 99 deletions
Download Patch File Download Diff File Expand all files Collapse all files
task3.sql
+32
View File
@@ -0,0 +1,32 @@
DO $$
DECLARE
board CHAR(8)[][] := ARRAY[
ARRAY['б', 'ч', 'б', 'ч', 'б', 'ч', 'б', 'ч'],
ARRAY['ч', 'б', 'ч', 'б', 'ч', 'б', 'ч', 'б'],
ARRAY['б', 'ч', 'б', 'ч', 'б', 'ч', 'б', 'ч'],
ARRAY['ч', 'б', 'ч', 'б', 'ч', 'б', 'ч', 'б'],
ARRAY['б', 'ч', 'б', 'ч', 'б', 'ч', 'б', 'ч'],
ARRAY['ч', 'б', 'ч', 'б', 'ч', 'б', 'ч', 'б'],
ARRAY['б', 'ч', 'б', 'ч', 'б', 'ч', 'б', 'ч'],
ARRAY['ч', 'б', 'ч', 'б', 'ч', 'б', 'ч', 'б']
];
BEGIN
RAISE NOTICE 'Шахматная доска:';
FOR i IN REVERSE 1..8 LOOP
RAISE NOTICE '%', board[i];
END LOOP;
RAISE NOTICE 'Размещение фигуры А на клетке A5:';
board[8 - 5 + 1][ASCII('A') - 64] := 'A';
FOR i IN REVERSE 1..8 LOOP
RAISE NOTICE '%', board[i];
END LOOP;
RAISE NOTICE 'Размещение фигуры У на клетке H4:';
board[8 - ч + 1][ASCII('H') - 64] := 'У';
FOR i IN REVERSE 1..8 LOOP
RAISE NOTICE '%', board[i];
END LOOP;
END $$;