1.
x не кратно 4 x mod 4 <>0
-5<x<-2 (x>-5)and(x<-2)
x принадлежит [-1,5] (x>=-1)and(x<=5)
2.
uses crt;
var n1,n2,n3:byte;
begin
writeln('Введите 3 разных числа от 1 до 9 по порядку:');
readln(n1,n2,n3);
if(n2-n1=3)and(n3-n2=3)then write('На вертикали!');
readln
end.
1. На кой такие сложности не ясно. Коды символов идут по порядку русских на сколько я помню,
2. Отладка в этом случае должна помоч. Вводи алфавит и смотри результат, должен быть сдвиг на ключ.
Program dfghf;
begin
writeln('Здравствуйте я выучила правило');
end.
В таких задачах идем с конца меняя знаки операций на противоположные, затем собираем алгоритм с конца меняя знаки операций:
50 / 2
25 - 1
24 / 2
12 / 2
6 / 2
3 - 1
2 / 2
1-1
0
Получим :21211121