A three-digit number is entered from the keyboard. Display the double digit of the Pascal units.

program zz1;
var k, s, a: integer; // set variables of integer type
begin
write (‘enter the given three-digit number’); // enter the number from the keyboard
read (k);
s: = k mod 10; // get the last digit, that is, the number of ones
a: = s * 2; // double the received number of units
writeln (‘received result =’, a); // display the answer
end.