Question

Очень срочно нужно написать программу! Помогите пожалуйста. Заданный текст содержит только буквы и цифры. Определить, обладает ли он следующим свойством: текст является десятичной записью числа, кратного 9.(Паскаль, Делфи)

Answer 1

Var str:string;
begin
read(str);
if val(str) mod 9 = 0 then write('является')
else write('не является');
end.