1.написать программу, которая печатает true или false в зависимости от того, выполняется или нет условие: цифры заданного трехзначного числа по возрастанию. 2.вычислить: y=cos (x+1) +cos (x+1.2) + +cos (x+1.8) 3. подсчитать количество цифр в заданном тексте. 4. дан массив а, содеpжищий как положительные, так и отpицательные числа. удвоить все отpицательные числа, исключить все положительные.
var
n: integer;
b: boolean;
begin
writeln('Введите трёхзначное число: ');
readln(n);
if n div 100 < (n div 10) mod 10 then
if (n div 10) mod 10 < n mod 10 then b:=true
else b:=false;writeln(b);
end.