Var
a, b: integer;
begin
readln(a, b);
writeln('Сумма чисел: ', a+b);
writeln('Разница между числами: ', abs(a-b));
writeln('Квадрат разности: ', sqr(a-b));
writeln('Частное: ', a div b);
writeln('Остаток от деления первого на второе: ', a mod b);
end.
1.
Потому что в остальных есть цифра 3,4
ДеревнИ, дорогИ. Окончание И
Собственно законы, которые я использовал приведены слева.
Буква и цифра и всё
знак-- буква--&>цифра