1.даны четыре целых числа,определить сколько из них чётных. 2.составить алгоритм решения квадратного уравнения,рассмотреть 3 случая значения дискриминанта(d> 0,d=0,d< 0). 3.вывести на экран номер четверти который принадлежит
точкам,координатам x,y введёнными с клавиатуры(рассмотреть вариант когда(x=0,y=0). на завтра. 25

begin

  readseqinteger(4).where(t -> t.iseven).count.println

end.

begin

  var (a, b, c) : = readreal3('введите a, b, c: ');

  var d : = b * b - 4 * a * c;

  if d < 0 then println('нет корней')

  else

    if d = 0 then println('x =', -b / 2 / a)

    else

    begin

      d : = sqrt(d);

      print('x1 =', (-b - d) / 2 / a);

      println('x2 =', (-b + d) / 2 / a);

    end

end.

begin

  var (x, y) : = readreal2;

  if x = 0 then

    if y = 0 then println('начало координат')

    else println('ось oy')

  else

    if y = 0 then println('ось ox')

    else

      if x < 0 then

        if y > 0 then println('ii четверть')

        else println('iii четверть')

      else

        if y > 0 then println('i четверть')

        else println('iv четверть')

end.

1.

var числа = []; for (let сч = 0; сч < 3; сч++) числа.push(math.floor(math.random() * 100)); var чётных = 0; числа.foreach(function (зн) { if (зн % 2 == 0) чётных++; }); alert(чётных);

2.

var a = prompt("a: "), b = prompt("b: "), c = prompt("c: ");

var d = math.pow(b, 2) - 4 * a * c;

if (d < 0) alert("нету решений.");

else if (d == 0) alert("x = " + (-b / 2 / a));

else alert("x_1 = " + - math.sqrt(d)) / 2 / a) + "; x_2 = " + + math.sqrt(d)) / 2 / a));

3.

var x = prompt("x: "), y = prompt("y: ");

if (x > 0) {

  if (y > 0) alert("i"); else if (y < 0) alert("iv"); else alert("на оси ox");

}

else if (x < 0) {

  if (y > 0) alert("ii"); else if (y < 0) alert("iii"); else alert("на оси ox");

}

else if (y == 0) alert("в центре координат");

else alert("на оси oy");