Раздел «Язык Си».CribPascal:

Язык Pascal

Hello, world 

Program HelloWorld(output);
begin
  writeln('Hello, world!')  { оператор вывода строки }
end.
Ввод Вывод
отсутствует Hello, world!

Считать два числа и вывести разность 

var a,b:longint;
begin
   readln(a,b);
   writeln(a-b);
end.

или, с введением дополнительной переменной res 

var a,b,res:longint;
begin
   readln(a,b);
   res := a-b;
   writeln(res);
end.

Ввод Вывод
5 3 2
3 5 -2

Считать число и напечатать NEG, если оно отрицательное и POS, если оно не отрицательное 

var a,b:longint;
begin
   readln(a,b);
   if (a<0) then
      writeln('NEG');
   else
      writeln('POS');
end.

Ввод Вывод
-5 NEG
5 POS
0 POS

Операторы сравнения и логические операторы

Оператор Что делает
== сравнить на равенство
<> сравнить на неравество
< меньше
<= меньше или равно
> больше
>= больше или равно
and логическое И
or логическое ИЛИ
not логическое НЕ

Распечатать числа от 0 до 9 включетельно через пробел 

var i:longint;
begin
   for i:=0 to 9 do
      writeln(i);
end.

или 

var i:longint;
begin
    i:=0
    while i<=9 do
        writeln(i);
end.

Операторы break и continue

Оператор Что делает
break выход из цикла (одного, ближайшего)
continue переходит к следующей итерации этого цикла

Записать 5 целых чисел в массив из 5 элементов, затем распечатать массив в обратном порядке

Этот код считывает введенные числа по 1 на строку. Если у вас все числа на одной строке, то используйте read вместо readln 
Type  
  TA = Array[1..5] of Integer;  
 
var  
  a : TA;  
  i : Integer;  
begin  

// создали массив целых чисел из N элементов
begin
  for i:=1 to 5 do
    readln(a[i]);
  for i:=5 downto 1 do
    writeln(a[i]);
end.
Ввод Вывод
3 56 72 -4 12 12 -4 72 56 3