Как и сказал, смог только первый.
Для начала нужно ввести числа квадратного уравнения в строку. То есть, числа вместо a, b и c. А потом надо ввести в строку число "х", чтобы проверить его на наличие решения.
Вот сам код:
program name;
var a, b, c, d, x1, x2, x3: real;
begin
writeln('Введите коэффициенты квадратного уравнения') ;
readln(a, b, c);
d:=sqr(b) - (4*a*c);
x1:= (-b-sqrt(d)) / 2*a;
x2:= (-b+sqrt(d)) / 2*a;
Writeln('Введите число х, чтобы проверить, является ли оно корнем уравнения') ;
readln(x3);
If x3 = x1 then
Writeln('Число ', x3, ' является корнем уравнения.')
Else If x3 = x2 then
Writeln('Число ', x3, ' является корнем уравнения.')
Else
Writeln('Число ', x3, ' не является корнем уравнения.') ;
End.
1) 4*90=360
2) 4416:8=552
3) 14кб / 16384 = 14 * 8 * 1024 / 16384 бит = 7 бит
Ответ:
a. развитие железнодорожного транспорта
Объяснение:
потому что
<span>Компьютер-это устройство или система, способное выполнять заданную чётко определенную изменяемую последовательность операций.</span>
Используется 256 символов потому что текстовая информация не пишется буквами.а кодируется в системе кодом минус ноль и ноль