Не работает возведение в степень

@Ann_ss · Регистрация: 23.09.2011

Author24 — интернет-сервис помощи студентам

Вот код :

Pascal

program lab4;
var 
i:integer; 
x,y:real; 
 
begin 
readln(x); 
if (x>=(-3)) and (x<(-2)) then y:=x^3 
else 
if (x>=(-2)) and (x<0) then y:=x/2 
else 
if (x>=0) and (x<=3) then y:=2*x+1; 
writeln(y); 
end.

Когда запускаю прогу, вылазиет чёрное окно, там пишу число и происходит что-то не понятное..помогите разобраться..

@~~pavelr~~ · 23.09.2011, 13:23

Вот так вот(^) в Паскале в степень не возводят,надо y:=sqr(x)*x;

@Ann_ss · 23.09.2011, 13:34 **[ТС]**

Я так-то уже разобралась.Спасибо)

@~~pavelr~~ Заблокирован
	23.09.2011, 13:23	2
	Вот так вот(^) в Паскале в степень не возводят,надо y:=sqr(x)*x; 0

@Ann_ss 0 / 0 / 0 Регистрация: 23.09.2011 Сообщений: 5
	23.09.2011, 13:34 [ТС]	3
	Я так-то уже разобралась.Спасибо) 0