Ответы
Ответ дал:
0
//Pascal
var
x, y: real;
begin
write('x = '); readln(x);
if x > 100 then
y := 5 * x + 6
else
if ((x >= 10) and (x <= 100)) then
y := 200 * x
else
if x < 10 then
y := x / 2;
writeln('y = ', y);
end.
var
x, y: real;
begin
write('x = '); readln(x);
if x > 100 then
y := 5 * x + 6
else
if ((x >= 10) and (x <= 100)) then
y := 200 * x
else
if x < 10 then
y := x / 2;
writeln('y = ', y);
end.
Вас заинтересует
1 год назад
1 год назад
8 лет назад
8 лет назад