составить программу для вычесления у=4х/12b+10
Ответы на вопрос
Ответил ad1997ya
0
Без шага!
uses crt;
var
y,x,b: real;
begin
clrscr;
read (x,b);
y:=4*x/(12*b)+10;
writeln ('y=',y);
readln ();
end.
uses crt;
var
y,x,b: real;
begin
clrscr;
read (x,b);
y:=4*x/(12*b)+10;
writeln ('y=',y);
readln ();
end.
Новые вопросы