В книге на одной странице помещается K строк. Таким образом, на 1-й странице печатаются строки с 1-й по K-ю, на второй - с (K+1) - й по (2∙K) - ю и т. д. Напишите программу, которая по номеру строки в тексте определяет номер страницы, на которой будет напечатана эта строка, и порядковый номер этой строки на странице.

Пусть нужно узнать, где будет напечатана строка с номером n. Для предыдущих (n - 1) строк нужно (n - 1) div k полных страниц и ещё (n - 1) mod k строк на ((n - 1) div k + 1) - ой странице. n-я строка будет следующей на этой странице.

var

n, k, fullPages, restLines: integer;

begin

write ('Номер строки: ') ;

readln (n) ;

write ('Строк на странице: ') ;

readln (k) ;

fullPages : = (n - 1) div k;

restLines : = (n - 1) mod k;

writeln ('Страница: ', fullPages + 1, ', строка: ', restLines + 1) ;

end.