Дистанционная подготовка: в чем ошибка?
в чем ошибка?
от Андрей Глейх - Четверг 25 Октябрь 2012, 14:29
1445. Координаты соседей
  Вывожу четыре пары координат в виде x y.
Ни одного правильного ответа.
Предположил, что надо выводить в виде y x - ничего не изменилось.

Предположил, чтонельзя использовать функцию, для определения принадлежности ячейки исходной таблице - убрал ее. Ничего не изменилось. В чем ошибка то может быть.
Re: в чем ошибка?
от Денис Кириенко - Суббота 27 Октябрь 2012, 09:46
  Входные числа записаны так:

3 3
2 2

А вы считываете по одному числу в строке
Re: в чем ошибка?
от Анастасия Фетисова - Вторник 24 Февраль 2015, 23:41
  А как их считать не по одному числу в строке?
Re: в чем ошибка?
от Peter Cherepanov - Среда 25 Февраль 2015, 03:32
  Анастасия, вопрос был про язык Питон, а вы пишете на Паскале. В Паскале есть потоковый ввод и разделение на строчки несущественно.
Re: в чем ошибка?
от Анастасия Фетисова - Воскресенье 1 Март 2015, 18:43
  Но у меня все равно не пропускает программу, хотя работает все верно.
var x,y,n,m:longint;
begin
readln(m); read(n);
readln(x); read(y);

if n>1 then
if y=1 then writeln(x,' ',y+1)
else if y=n then writeln (x,' ',y-1)
else begin writeln (x,' ',y-1); writeln (x,' ',y+1) end;
if m>1 then
if x=1 then writeln (x+1,' ',y)
else if x=m then writeln (x-1,' ',y)
else begin writeln (x-1,' ',y); writeln (x+1,' ',y) end;
end.
Re: в чем ошибка?
от Грабовый Саша - Вторник 19 Май 2015, 15:34
  llllllllllllllljjkhjjgjgjjjj,mm,m,m,