Var a,b:integer; x:real; begin readln (a,b); x:=abs(b/a); writeln (x:0:2); end.
АБС это модуль, но я могу и ошибаться, тогда var a,b:integer; x:real; begin readln (a,b); If a<0 then a:=a*(-1); If b<0 then b:=b*(-1); x:=abs(b/a); writeln (x:0:2); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
