Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ проверка задачи

Автор: dasha885 30.10.2007 22:52

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 30.10.2007 23:23

Цитата(dasha885 @ 30.10.2007 18:52) *

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 - Запуск программы.

Автор: dasha885 31.10.2007 0:45

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

Автор: мисс_граффити 31.10.2007 0:52

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

Автор: Гость 31.10.2007 1:01

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

Автор: Гость 31.10.2007 1:04

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