Автор Валентина задал вопрос в разделе Другие языки и технологии
Паскаль. Синус. и получил лучший ответ
Ответ от *Алина*[гуру]
Var x,y:real;
Begin
x:=0;
begin
while x<=3.14 do
begin y:=Sin(x);
Writeln(y);
x:=x+0.1;
End
End;
readln ;
End.
Ответ от Gargoel[гуру]
В предыдущем вопросе уже не могу отписаться, пишу сюда
Если и правда: Ошибка 94
то "Пропущен знак "точка".
Возможно, что тип используется как переменная или что имя программы непосредственно отменяет важный идентификатор из другого модуля. "©
Вероятней всего представленный код не полный, и та программа которую вы зщапускаете содержит вначале строку
"Program sin;"
Здесь идентификатор Sin который по умолчанию должен быть функцией, становится именем программы и функцию уже вызвать невозможно.
Надеюсь не слишком поздно я...
В предыдущем вопросе уже не могу отписаться, пишу сюда
Если и правда: Ошибка 94
то "Пропущен знак "точка".
Возможно, что тип используется как переменная или что имя программы непосредственно отменяет важный идентификатор из другого модуля. "©
Вероятней всего представленный код не полный, и та программа которую вы зщапускаете содержит вначале строку
"Program sin;"
Здесь идентификатор Sin который по умолчанию должен быть функцией, становится именем программы и функцию уже вызвать невозможно.
Надеюсь не слишком поздно я...
Ответ от Олег Деревенец[гуру]
Работает Ваша программа, проверил.
Только Readln в конце добавьте, что б результат увидеть 🙂
Вот еще:
"Песни о Паскале" - программирование для школьников и начинающих.
Погуглите в паутине, скачивается бесплатно.
Работает Ваша программа, проверил.
Только Readln в конце добавьте, что б результат увидеть 🙂
Вот еще:
"Песни о Паскале" - программирование для школьников и начинающих.
Погуглите в паутине, скачивается бесплатно.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Паскаль. Синус.