Ответы
Ответ дал:
0
Var x,y:real;
Begin
Write('Введите x= '); readln(x);
if (x<=83) then y:=28*x+157
else y:=20*x-595;
Writeln('y=',y);
end.
Begin
Write('Введите x= '); readln(x);
if (x<=83) then y:=28*x+157
else y:=20*x-595;
Writeln('y=',y);
end.
Ответ дал:
0
var x,y:integer;
begin
readln(x);
if x<=83 then writeln('При x=',x,' y=28x +157=',28*x +157)
else writeln('При x=',x,' y=20x-595=',20*x-595);
end.
begin
readln(x);
if x<=83 then writeln('При x=',x,' y=28x +157=',28*x +157)
else writeln('При x=',x,' y=20x-595=',20*x-595);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад