Решите задачу в программе паскаль. ecли число является двузначным и четным уменьшить его в 2 раза иначе увеличить на 10.пожалуйста, помогите!!!

Var a: integer;
b: real;
begin
readln (a);
if (a > 9) and (a < 100) and (a mod 2 = 0) then
b:= a/10
else
b:= a + 10;
writeln (b);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.