program KONIK
% • •
Podaj współrzędne konika szachowego read (X,Y)
Czy podane współrzędne mieszczą się na szachownicy A if X<1 or X>8 or Y<1 or Y>8 ...
Sygnalizuj błąd write ('ZLE DANE')
Dla każdego pola szachownicy A ustal czy jest ono osiągalne (1 -TAK, 0-NIE) dla konika o podanych współrzędnych
for 1.-1 to 8
for J:=1 to 8 begin
A[l,J]:=0; if (X-I)*(X-I) + (Y-J)*(Y-J) = 5 then A[I,J]:=1 end:
" yWarf 6 Proaamowauie komputerów I q