Pascal/Turbo Pascal - sumar dos numeros y saber si el resultado es múltiplo de 10

var

  num1,num2,total:integer;

begin

  num1:=10;

  num2:=20;

  total:=num1+num2;

  if total mod 10 =0 then

    WriteLn('Es multiplo de 10')

  else

    WriteLn('No es multiplo de 10');

  ReadLn;

end. �