Постановка задачи: Дано натуральное число N. Если оно делится на 4, вывести на экран ответ N=4k (где k- соотв. частное); если остаток от деления на 4 равен 1, N=4k+1; если остаток от деления на 4 равен 2, N=4k+2; если остаток от деления на 4 равен 3, N=4k+3
Например, 12=4*3, 22=4*5+2
помогите составить пожалуйста алгоритм для отчета в паскале.

var n: integer;  begin    write('задайте число n: ');    readln(n);    writeln((n div 4)*4+(n mod 4));end.{ или по другому }{var n,m,ost: integer;begin  write('задайте число n: ');  readln(n);  m:=n div 4;   ost:=n-m*4;  writeln(m*4+ost);end.}