Даны натуральные числа n и m. Составьте программу, которая вычисляет сумму последних m цифр числа n.
Pascal
var m,n,i,z,p:integer;
begin
readln(m);
readln(n);
for i:=1 to m do
p=n mod 10;
z=z+p;
end;
writeln(z);
end.