Поскольку в iMacrose практически свободно можно использовать яваскрипт, то можно выполнять огромное количество действий. Решение квадратного уравнения на раз плюнуть.
Давно не решал таких уравнения, да вообще никаких уравнений уже лет 8 не решал и даже забыл как решать. Хотя должно быть наверное стыдно за это.
Процесс решения можно посмотреть на видио
А ниже я прикладываю простой код, который немного нужно доработать. Забыл как перенос строки сделать в команде iimDisplay(), поэтому просто поставил между ответами пробел. Ответ выводится в дисплей аймакроса. Можно и алертом.
var a=3, b=5, c=2;
var x1,x2;
var d = b*b-4*a*c;
if (d>0) {
x1 = (-b+Math.sqrt(d))/(2*a);
x2 = (-b-Math.sqrt(d))/(2*a);
iimDisplay(x1 +" "+ x2);
}
if (d<0) iimDisplay("Корней нет");
if (d==0) {x1 = -b/(2*a); iimDisplay("Один корень "+ x1);}
Элементарно просто и ничего сложного всего в несколько строк. Жаль в моих школных временах не было такой возможности, не было компьютера. А сейчас все просто.
Давно не решал таких уравнения, да вообще никаких уравнений уже лет 8 не решал и даже забыл как решать. Хотя должно быть наверное стыдно за это.
Процесс решения можно посмотреть на видио
var a=3, b=5, c=2;
var x1,x2;
var d = b*b-4*a*c;
if (d>0) {
x1 = (-b+Math.sqrt(d))/(2*a);
x2 = (-b-Math.sqrt(d))/(2*a);
iimDisplay(x1 +" "+ x2);
}
if (d<0) iimDisplay("Корней нет");
if (d==0) {x1 = -b/(2*a); iimDisplay("Один корень "+ x1);}
Элементарно просто и ничего сложного всего в несколько строк. Жаль в моих школных временах не было такой возможности, не было компьютера. А сейчас все просто.
Комментариев нет:
Отправить комментарий