var
a, b: integer;
begin
write('Введите a: ');
readln(a);
write('Введите b: ');
readln(b);
var x := Range(a, b);
var y:=(x.Where(x -> (x>=10) and (x<=99)));
writeln('Двузначные числа от A до B: ');
y.Println;
writeln('Двузначные числа, которые делятся на 15: ');
y.Where(x -> (x mod 15)=0).Println;
end.
Клавиша Tab
В вопросе ошибка - пропущена буква. Должно быть "какая клавиша не является парНой"
Не знаю, какая именно формула у тебя должна быть во втором условии, но ты явно намудрил со скобками
Во-первых, ты пишешь cos(a,3), фактически функция косинуса принимает только 1 аргумент, и если ты хотел косинус в кубе, то тебе надо pow(cos(a),3), примерно так