92

Решить уравнение Ах + В=0, если это возможно. Решить на языке Pascal, развервляющийся…

30 марта 2023

Решить уравнение Ах + В=0, если это возможно. Решить на языке Pascal, развервляющийся алгоритм. Решить надо до 11:00 по МСК, после непринимаю

категория: информатика



37

uses crt; var a,b: integer; x: real; beginread (a,b); if (a=0) or (b=0) then begin write ('Error'); exit; end else x: =-b/a; write ('Otvet: ',x); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...