Пользователь вводит целое число. программа должна ответить, четным является это число или нечетным, делится она на 3 или нет, и делиться оно на 6 или нет.

If (h % 2 == 1)   не чётное, иначе чётное if (h %  3 == 0)   делится на 3 if (h % 6 == 0)   делится на 6 % - остаток от деления в c#, как он выглядит в паскале не знаю

Pascal var    a,s,d,e : integer;     begin  readln (a);       s : = a div 100; //узнаем цифру сотен  d : = (a div 10) - (a div 100) * 10; //узнаем цифру десятков  e : = a mod 10; //узнаем цифру единиц     case s of    8,9 : a : = a * d;     3..5 : a : = s * 10 + d;       else      a : = a - s;       end;         writeln (a);   end.

Если смотреть с точки зрения паскаля, то получается такая ересь: var x,z,c,y: real; begin writeln('введите  первое  число'); readln(x); writeln('введите второе число'); readln(z); q: =x-y; (разность первого и последнего  числа); w: =z+c; (сумма второго и третьего числа); в случае если выполняются эти два условия if q > z then if w < y then  begin  writeln(w); writeln(z); end else  if q > z then writeln(z)  else if  w < y then writeln(w); end.