Cоставить два алгоритма:
Приложения:
Ответы на вопрос
Ответил kage1998
0
program gt;
var x,y:real;
begin
readln(x);
if(x=0)then y:=2*x-1 else y:=x*x+3;
writeln('x=',x,' y=',y);
end.
2)
program gt;
var x,y:real;
begin
readln(x);
if(x=0)then y:=0 else y:=x*x;
writeln('x=',x,' y=',y);
end.
var x,y:real;
begin
readln(x);
if(x=0)then y:=2*x-1 else y:=x*x+3;
writeln('x=',x,' y=',y);
end.
2)
program gt;
var x,y:real;
begin
readln(x);
if(x=0)then y:=0 else y:=x*x;
writeln('x=',x,' y=',y);
end.
Новые вопросы