zadach182.BAS

{* Задача182 *}

REM basic

' В матрице с девятью строками и столбцами находится 81 элемент.
' Дано число Х в диапазоне от 1 до 81, которое обозначает порядковый номер
' элемента. Определить номер строки и номер столбца элемента Х.


CLS
INPUT "X ", X
  Stroka = (X  9) * ((X  9) - (X - (X  9) * 9 > 0))
  Stolb = (X  9) * (X - (X  9) * 9 - (X / 9 = X  9) * 9)
PRINT "Строка"; Stroka; "Столбец "; Stolb
End