проверка задачи Опции

[dasha885]

1 раз работаю в Паскале.
Есть и где тут ошибки?И как запустить программу( у меня не выходит)

program My_Homework1;
uses crt;
var
x,a,c:extended;
b:integer;
chislitel,znam,R:extended;
begin
clrscr
WRITE('введте->>');
Readln(x);
a:=7.3;
b:=34;
c:=54.32;
chislitel:=2*d-sgr(cos)x;
znam:=ABS(sin(7+c)\cos(7+c))-a;
R:=chislitel\znam;
WRITE:('R='R);
readkey;
end

[Better Kind]

1 раз работаю в Паскале.
Есть и где тут ошибки?

Ага.

Код

clrscr[b];[/b]
.....
chislitel:=2*[b]b-sqr(cos(x));[/b]
znam:=ABS(sin(7+c)[b]/[/b]cos(7+c))-a;
R:=chislitel[b]/[/b]znam;
WRITE('R='[b],[/b]R);

на последнем енде поставь точку END.

Alt+F5 - экран пользователя (можно видеть результат работы программы)
F9 - Make (компилирует связи) программы
Alt+F9 - Компиляция
Ctrl+F9 - Запуск программы.

Сообщение отредактировано: Better Kind - 30.10.2007 19:27

[dasha885]

Спасибо, но ему все равно что-то не нравится...

[мисс_граффити]

поставь ; после clrscr
первой строчкой напиши {$N+}
что такое d - непонятно
sqr, а не sgr
скобки неправильно стоят
там дальше еще есть...
и вообще... компилятор же пишет, какая ошибка! просто читай.

[Гость]

мисс_граффити, это уже исправила.
Коопературу не нравятся 5 и 3 с конца строчки.

[Гость]

Все.думаю бо одном. пишу о другом.
компилятору конечно же