Ответы
Ответ дал:
0
x^{2} 
Ответ дал:
0
Нужно составить программу на Паскале
Ответ дал:
0
var x:integer; y:real;
begin
write('x = '); readln(x);
if (x<1)or(x>5)
then writeln('функция не определена')
else begin
case x of
1 : y:=3*x*x;
2,3,4: y:=100;
5 : y:=sqrt(x);
end;
writeln('y = ',y);
end;
end.
Пример:
x = 2
y = 100
begin
write('x = '); readln(x);
if (x<1)or(x>5)
then writeln('функция не определена')
else begin
case x of
1 : y:=3*x*x;
2,3,4: y:=100;
5 : y:=sqrt(x);
end;
writeln('y = ',y);
end;
end.
Пример:
x = 2
y = 100
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад