Вот на изображении вроде оно
Var x,y,a,b:integer;
begin
write('x, y:');
readln(x,y);
if (x>0)and(y>0) then
begin
a:=x; b:=y;
while a<>b do
if a>b then a:=a-b else b:=b-a;
writeln('НОД(',x,',',y,') = ',a);
end
else writeln('Ошибка ввода');
end.
Пример:
<span>x, y:
50 125
НОД(50,125) = 25</span>
Перед нами пример авторитарного стиля отношений. С одной стороны Волк как олицетворение Силы и с другой стороны Ягненок как олицетворение Слабости. Сила Волка дает ему хоть и незаконную но власть над бедным ягненком. Но чтобы придать своим действиям хоть какую-то видимость закона Волк говорит об обстоятельствах которые усугубляют вину несчастного Ягненка. Можно сказать что эти отношения являются характерными для России когда у одних в руках сила власть и богатство а у других - только малость самого необходимого. Вдобавок потенциальная возможность у слабых стать в том или ином роде пищей для обладателей Власти.
У сильного всегда бессильный виноват:
Тому в Истории мы тьму примеров слышим,
Но мы Истории не пишем;
А вот о том как в Баснях говорят.
Ягненка видит он, на до́бычу стремится;
Но, делу дать хотя законный вид и толк,
Вы сами, ваши псы и ваши пастухи,
Вы все мне зла хотите,
И если можете, то мне всегда вредите:
Но я с тобой за их разведаюсь грехи». —
Ты виноват уж тем, что хочется мне кушать» .