составить программу в Паскале для первого графика
Приложения:
Ответы на вопрос
Ответил Mepkypuu
0
var a:real;
begin
readln(a);
if a<-1 then
writeln('y=0 f(a)=',a*0)
else if (a>-1) and (a<=0) then
writeln('y=1 -|x| f(a)=',1-abs(a))
else if a>=0 then
writeln('y=1 -|x| f(a)=',1-abs(a));
end.
begin
readln(a);
if a<-1 then
writeln('y=0 f(a)=',a*0)
else if (a>-1) and (a<=0) then
writeln('y=1 -|x| f(a)=',1-abs(a))
else if a>=0 then
writeln('y=1 -|x| f(a)=',1-abs(a));
end.
Ответил Mepkypuu
0
подходит?)
Ответил yokii
0
да. спасибо
Ответил Mepkypuu
0
агась)
Новые вопросы