Помогите с информатикой, пожалуйста. Напишите процедуру, которая выводит на экран решение линейного алгебраического уравнения. Параметры и являются параметрами процедуры.
Ответы на вопрос
Ответил BrightOne
0
procedure SolveLinear;
var
k, x, b, y: real;
begin
write('k=');
readln(k);
write('x=');
readln(x);
write('b=');
readln(b);
y := k * x + b;
writeln('y=kx+b=', y);
end;
var
k, x, b, y: real;
begin
write('k=');
readln(k);
write('x=');
readln(x);
write('b=');
readln(b);
y := k * x + b;
writeln('y=kx+b=', y);
end;
Ответил Аноним
0
Поздно, но все равно благодарю.
Ответил theChurchil
0
Для меня как раз
Новые вопросы
Математика,
2 года назад
Химия,
2 года назад
Информатика,
8 лет назад
Математика,
8 лет назад
Биология,
9 лет назад
Математика,
9 лет назад