Конечная точка
x = x0 + 3(1+1)+3 = x0+9
y = y0 + 3(3-2)+9 = y0+12
х0 у0 - начальные координаты
(9, 12) - общий вектор смешения за алгоритм
Информация-Это сведения о окружающем нас мире
var
s:string;
z,z1,i:integer;
begin
readln(s);
z:=0;
z1:=0;
for i:=1 to length(s) do
begin
if s[i]='м' then inc(z);
if s[i]='н' then inc(z1);
end;
if z>z1 then writeln('больше букв м');
if z<z1 then writeln('больше букв н');
if z=z1 then writeln('букв м и н равное количество');
end.
Может ошибок а не вирусов Зака чай себе антивирусник или redorganaizer для исправление ошибок