Display the value of the logical expression, which evaluates to true if K is a two-digit multiple of five, and false otherwise.

program k5_2;
var k: integer;
m: boolean;

begin
k: = 1;

while k <> 0 do
begin
write (‘Enter number k =’);
readln (k);
if ((k> 9) and (k <100) and (k mod 5 = 0)) then m: = true else m: = false;
writeln (m)
end

end.

The program checks the condition: the number must be greater than 9 and less than 100 (that is, two-digit), and also a multiple of 5 in order for the boolean variable m to take the value truе. If at least one part of the condition is not met, then m = false.