Определите, является ли заданное число а нечетным двухзначным числом. составить программу.

var a: integer;

begin

readln(a);

if a< 0 then a: =(-1)*a;

if (a mod 2< > 0) and (a> 9) and (a< 100) then

write(a,' - нечетное двузначное число') else

write(a,' - не является нечетным двузначным числом');

end.

а) наименование товаров, цена за единицу товара, количество каждого товара

б) общая сумма покупки, сумма денег переданная продавцу

в) программа телепередач, название фильма

г) набор значений углов и сторон треугольника, должна быть известна хотя бы одна сторона треугольника и еще две величины(углы или стороны)

я так понимаю нужно нарисовать рисунки рыб, карасей и различных животных. множества нужно перекрестить(множество рыб и хищ. животных), так как рыба тоже может быть хищником