Помогите с паскалем.

Question

Program Text; 
Uses crt; 
var x,y : integer; 
Begin 
ClrScr; 
write('napichite lyboe chislo:'); readln(x); ClrScr; 
if x<0 then y:=1 
else if x>pi 
then y:=0 
else 
y:=cos(x); -при компиляции паскаль не пропускает эту строку, пишет error 26 type mismatch(неправильный тип переменной) . 
 
readln; 
End. 
 
подскажите, что сделать.

Алексей Деко · Accepted Answer

Попробуй x и y сделать не integer, а Real/Double.

Даша · Answer

Напиши текст задачи...

Татьяна Решетова · Answer

Ставь X и Y real и да прибудет счастье, и не забудь все-таки вывести Y в конце программы.

Сергей Толкачев · Answer

var x,y : integer; 
y:=cos(x); 
 косинус целым не бывает