Давайте разберем по шагам, как создать три программы на языке Pascal для решения указанных задач.

Эта программа должна проверить, является ли число положительным, и в зависимости от этого выполнить разные действия.

1. Начнем с объявления переменной для хранения целого числа.
2. С помощью команды ReadLn прочитаем число с клавиатуры.
3. Используем условный оператор If для проверки, положительное ли число.
4. Если число положительное, прибавим к нему 1. Если нет, найдем остаток от деления на 2.
5. Выведем результат на экран.

Вот пример кода:

program ProcessInteger;
var
    number: Integer;
    result: Integer;
begin
    ReadLn(number);
    if number > 0 then
        result := number + 1
    else
        result := number mod 2;
    WriteLn(result);
end.

Эта программа должна определить, какая из цифр в двузначном числе больше.

1. Объявим переменную для хранения двузначного числа.
2. Считаем, что двузначное число может быть от 10 до 99.
3. С помощью ReadLn прочитаем число.
4. Разделим число на десятки и единицы с помощью целочисленного деления и остатка от деления.
5. Сравним обе цифры и выведем на экран большую.

Вот пример кода:

program CompareDigits;
var
    number, tens, units: Integer;
begin
    ReadLn(number);
    tens := number div 10;
    units := number mod 10;
    if tens > units then
        WriteLn('Больша цифра: ', tens)
    else if units > tens then
        WriteLn('Больша цифра: ', units)
    else
        WriteLn('Цифры равны');
end.

Эта программа должна проверить, является ли 7 делителем заданного числа.

1. Объявим переменную для хранения числа.
2. С помощью ReadLn прочитаем число.
3. Используем условный оператор If для проверки делимости на 7 с помощью операции остатка от деления.
4. Выведем соответствующее сообщение на экран.

Вот пример кода:

program CheckDivisibility;
var
    number: Integer;
begin
    ReadLn(number);
    if number mod 7 = 0 then
        WriteLn('7 является делителем числа')
    else
        WriteLn('7 не является делителем числа');
end.

Теперь у вас есть три программы на Pascal, каждая из которых решает свою задачу. Вы можете использовать их в своих учебных целях или доработать по своему усмотрению!