Хром, опередил...
4) не въезжаю че надо, очень корявое условие.


3)
uses crt;
var
x: real;
begin
writeln('Enter X ');
readln(x);
X := (Pi/360)*X;
x:=sin(x);
writeln('Sin = ', x);
readln;
end.
Таки так... забыл ты про син ))

Адрес поста | Один пост | Сообщить модератору | IP: Logged