Написать алгоритм решения следующей .роботу 2 числа. если первое число меньше второго, то робот должен вывести на экран их произведение, в противном случае сумму.

Алг робот   вещ x,y нач   ввод(x,y) если x< y тогда вывод (x*y)                 иначе вывод(x+y) кон

1) if b< > 0 then        begin          y: =-c/b ;         writeln('(0; ',y,')');       end   else writeln('такой точки нет'); 2)  if a< > 0 then        begin          y: =-c/a ;         writeln('(',x,'0)');       end   else writeln('такой точки нет');   3) 4) аналогично для коэффициентов    d, e, f        5) if (bd-ae)< > 0 then         begin           x: =(-f*b+e*c)/(b*d-a*e);           y: =(-c-a*x)/b;     writeln('(',x,'; ',y,')');         end   else writeln('не пересекаются');

// №1 //цикл repeat var i,s: real; begin   s: =0;   i: =0.3;   repeat         s: =s+i;         i: =i+0.3;   until i > = 3;   writeln('сумма ',s); end. // №2 //цикл while var p: real;   i: integer; begin   p: =1;   i: =20;   while i> 2 do begin         p: =p*(1/i);         i: =i-1;   end;   writeln('произведение членов ряда ',p); end.