Решите,пожалуйста,задачи. 1)Дано линейное уравнение вида ах=b.Если решения этого...

0 голосов
43 просмотров

Решите,пожалуйста,задачи.
1)Дано линейное уравнение вида ах=b.Если решения этого уравнения не существует, то выведите нет решения.Если решение существует,то выводим значение х.
2)Даны 3 числа.Выясните,существует ли треугольник с такими сторонами.


Информатика (17 баллов) | 43 просмотров
Дан 1 ответ
0 голосов

1)
var
a,b:real;
begin
write('A=');readln(a);
write('b=');readln(b);
if a<>0 then
write('X=',-b/a)
else
write('Нет решений');
end.
2)
var
a,b,c:real;
begin
write('Введите сторону A='); readln(a);
write('Введите сторону B='); readln(b);
write('Введите сторону C='); readln(c);
if ((a+b)>c) and ((a+c)>b) and ((b+c)>a) then
write('Треугольник существует')
else
write('Треугольник не существует');
end.

(1.7k баллов)
0

Спасибо огромное)

0

у линейного уравнения всегда решение есть, для а = 0 решений бесконечное множество