Ответы
Ответ дал:
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
Вас заинтересует
3 года назад
3 года назад
8 лет назад
8 лет назад
10 лет назад
10 лет назад
10 лет назад