1. Написать программку вычисления корня линейного уравнения kx + b =

1. Написать программу вычисления корня линейного уравнения kx + b = 0/
2. Даны два числа. Обусловьте, одинаковы либо не равны эти числа.

Задать свой вопрос
Игнатенкова Эвелина
Паскаль?
Дмитрий Людвей
да
1 ответ
Var k,b:real;
Begin
WriteLn('kx +b = 0');
Write('k = ');
ReadLn(k);
Write('b = ');
ReadLn(b);
WriteLn('x = ',-b/k);
End.



Var a,b:real;
Begin
WriteLn('Введите два числа');
ReadLn(a,b);
if a=b then WriteLn('Числа равны')
else WriteLn('Числа неравны');
End.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт