Задача 1:
Пользователь вводит число. Если он попал в промежуток между 100 и 120 - Говорить попал, иначе не попал.
Задача 2:
На цикл for. Пользователь вводит число n, вывести n раз строчку "Я люблю прыгать"
ДОПОЛНЕНИЕ:
В задаче 1 присвоить переменной типа boolean true или false если он попал или нет. if(b), b:boolean;

(1) var a:integer; b:boolean;

begin

read(a);

if (a > 100) and (a < 120) then b := true else b := false;

if (b) then writeln('popal') else writeln('ne popal');

end.

(2) var i:integer; n: integer;

begin

read(n);

for i := 1 to n do writeln('I love jumping');

end.