Студент зa лето заработал c руб. ежемесячная стипендия студента составляет а руб, расходы на проживание - в руб. (а

Var a,b,c : real; time : integer; begin writeln('сколько заработал за лето'); readln(c); writeln('стипендия = '); readln(a); writeln('расходы на проживание'); readln(b); c: =c+a-b; while (c> =0) do begin c: =c+a-b; b: =b+(b/100*3); time: =time+1; end; writeln('денег хватит на ',time,' месяцев'); end.

import random

while True:

       a = random.randint(1, 9)

       b = random.randint(1, 9)

       i = 0

       while True:

               try:

                       print("%dx%d=" % (a, b), end="")

                       i = int(input())

               except ValueError:

                       print("Введите число!")

               else:

                       break

       rightAnswer = a * b

       if i == rightAnswer:

               print("Верно!\n")

       else:

               print("Неверно! Верный ответ: %d\n" % rightAnswer)

(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.