true/false

@kevin Randleman · Регистрация: 04.10.2011

Author24 — интернет-сервис помощи студентам

Даны координаты (как целые от 1 до 8) двух различных полей шахматной доски. Если конь за один ход может перейти с одного поля на другое, вывести логическое значение True, в противном случае вывести значение False

@Puporev · 05.10.2011, 19:37

Pascal

uses crt;
var a,b,c,d:byte;
begin
clrscr;
repeat
writeln('Положение коня:');
write('a=');readln(a);
write('b=');readln(b);
until (a in [1..8])and(b in [1..8]);
repeat
writeln('Поле для хода:');
write('c=');readln(c);
write('d=');readln(d);
until (c in [1..8])and(d in [1..8]);
write(((abs(a-c)=1)and(abs(b-d)=2))or((abs(a-c)=2)and(abs(b-d)=1)));
readln
end.

@kevin Randleman 17 / 5 / 1 Регистрация: 04.10.2011 Сообщений: 17
		1
	true/false 05.10.2011, 18:51. Показов 1357. Ответов 1 Метки нет (Все метки) Даны координаты (как целые от 1 до 8) двух различных полей шахматной доски. Если конь за один ход может перейти с одного поля на другое, вывести логическое значение True, в противном случае вывести значение False 0

	05.10.2011, 19:37

Опции темы

true/false

Решение