Информатика, опубликовано 2018-08-22 19:47:19 by Гость
Var x,y,z:real; begin write (x=);readln(x); write (y=);readln(y); z:=abs(x)-abs(y)/1+abs(x*y); writeln(z=,z); end. какую подпрограммы-процедуру можно сделать?
Ответ оставил Гость
Подпрограмму
procedure rez(x,y:real):real;
begin
... rez=xxxxxx
end;
redln(y);
z:=rez(x,y);
writeln(z);
.....
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.