Вычислите по действиям значение выражения: 2 – 13 mod 7 / 3 + sqr (4). результат округлите до ближайшего целого abc паскаль

Вычисляем значение выражения 2 - 13 mod 7 / 3 + sqr(4)
1) 13 mod 7 = 13 - 7 = 6
2)  6 / 3 = 2.0
3) 2 - 2.0 = 0.0
4) sqr(4) = 4 * 4 = 16
5) 0.0 + 16 = 16.0
6) 16.0 округлить до целых: 16
В Паскале:
var
  i:integer;
begin
  i:=Trunc(2-13 mod 7/3+sqr(4));
  Writeln(i)
end.