надо перевести с языка паскаль на язык php [требует правки]

153
12 января 2017, 07:59
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]);
if ((abs(a-c)=1)and(abs(b-d)=2))or((abs(a-c)=2)and(abs(b-d)=1))then
write('Конь может за один ход попасть на заданное поле')
else write('Конь не может за один ход попасть на заданное поле');
readln
end.
READ ALSO
Остановка скрипта php

Остановка скрипта php

Как реализовать паузу во время появления формы капчи, потом после ввода капчи, продолжение работы

154
Ловля исключений php 7.1

Ловля исключений php 7.1

Есть класс исключения, унаследованный от Exception:

138