Y=3x/x+1, [-2; 2] составить программу с циклом(while, repeat)

Решение: а) . номера страниц идут от 1 до 64. страницы на двойных листах нумеруются так: 1-й – 1, 2, 63, 64; 2-й – 3, 4, 61, 62; ………………..; 16-й – 31, 32, 33, 34. б) . так как в последовательности, которую номера страниц двойного листа, суммы чисел, равноотстоящих от концов, одинаковы (1+64, 2+63 – 1-й лист; 3+62, 4+61 – 2-ой лист; ………………………..; 31+34, 32+33 – 16-й лист) , а именно 65, то сумма чисел на любом двойном листе (65+65=130) одна и та же. значит, нельзя указать двойного листа, у которого сумма чисел, обозначающая номера страниц наибольшая. ответ: такого двойного листа в журнале нет. надеюсь : )

(ax + b ) : ( cx + d ) = 0сводим уравнение к системе: { ax + b = 0{ cx + d ≠   0{ ax = -b{ cx  ≠   -d можно учесть все случаи, используя  больше  16 условий, но я предпочту  более  оптимальный вариант, так как знаю как зависит количество корней линейного уравнения от коэффициентов. программа на паскале: var a, b, c, d: real; begin   read(a, b, c, d);   if (c = 0) and (d = 0) then writeln('no')   else if (a = 0) and (b = 0) then writeln('inf')   else if a = 0 then writeln('no')    else if c = 0 then writeln(-b/a)   else if b/a = d/c then writeln('no')   else writeln(-b/a) end.