Паскаль

[yanna]

Паскаль

Помогите пожалуйста ребят, хотя бы немного
в школе препод топит заданиями... а оценка в аттестат идет

 

[yanna]

я уже и просто уравнения решала, и переводила на язык паскаль каждую переменную и в турбо паскале пыталась ввести, прочитала все советы в инете. но всё впустую, увы
как понять что такое оператор, и где составлять блок-схему?

 

[AlexZir]

В общем так. Берете учебник по информатике, открываете раздел "Алгоритмизация и программирование" и читаете, читаете, читаете...
Потом загружаете Pascal и пишите, пишите, пишите...
Можно также воспользоваться справочными материалами среды разработки. Да и для того, чтобы

прочитала все советы в инете

по этому языку программирования, нужно не меньше пары сотен лет, это как минимум. Думаю, у вас такого срока нет, поэтому рекомендую начать с прочтения этих материалов: http://www.tehnari.ru/531355-post1.html

Далее:
по первому алгоритму:
запрашиваете значение x, используете его для вычисления значения y. Затем с помощью вложенной структуры ветвления вычисляете значение F.

по второму алгоритму:
очевидно, что данный график задан тремя функциями
от минус бесконечности до -R функция y=0
от -R до +R функция окружности
+R до плюс бесконечности функция y=x-R
Программу пишите сами.

 

[yanna]

вот, что у меня получилось.
ровным счетом - ничего

 

[Vladimir_S]

вот, что у меня получилось. ровным счетом - ничего

Ничего, не отчаивайтесь.
Прежде всего - просьба: сохраняйте программы в файлы и выкладывайте сюда через copy-paste в текстовом виде, а не в виде картинки, чтобы мы могли с этими листингами работать.
Теперь по самой программе.
Даже не вдаваясь в суть Ваших действий (а всегда ОЧЕНЬ желательно видеть, какую задачу решает выложенная программа), отмечу следующее. Обратите внимание на ПРАВИЛЬНОСТЬ РАССТАНОВКИ СКОБОК - у Вас с этим явные проблемы. Главный критерий: в каждом операторе число открывающих скобок должно в точности равняться числу закрывающих. А у Вас? В строке вычисления а 4 открывающих и 3 закрывающих, в строке вычисления y - 6 открывающих и 4 закрывающих! Кроме того, readkey - это команда модуля CRT, а где у Вас uses CRT? Нету.
В общем - программирование неряшливости и "коекакерства" не прощает.
Успехов!

 

[yanna]

вот текст программы, скобки исправила. в общем, эта программа должна вычислить величины у(х) и F(у):

uses crt;
var
a, b, x, y: real;
begin
clrscr;
writeln('ўўҐ¤ЁвҐ §**зҐ*ЁҐ X');
readln(x);
writeln('ўўҐ¤ЁвҐ §**зҐ*ЁҐ A');
readln(a);
a:=exp(sin(x)/Abc(x)*Ln(2);
y:=sqrt(sqrt(8*exp(2*ln(x))-6*x+1))/arctan1/sqrt(2x+1);
writeln('§**зҐ*ЁҐ y'),y:3:3;
readkey;
end.

 

[Vladimir_S]

вот текст программы, скобки исправила.

Нет, не исправили. Считайте внимательно.
И не только скобки. Сравните.
У Вас:
a:=exp(sin(x)/Abc(x)*Ln(2);
А должно быть
a:=exp(sin(x)/Abs(x)*Ln(2));
Как говорится, выводы делайте сами.

 

[yanna]

спасибо за то, что хотя бы откликнулись)
пожалуй, оставлю это дело.. раз даже учебники не помогают

 

[Vladimir_S]

пожалуй, оставлю это дело..

А вот это - зря! На самом деле, ничего сложного там нет. Просто много внимательности, немного усидчивости и малая толика базовых знаний - дальше всё как по маслу покатится!

раз даже учебники не помогают

А, простите, как Вы их применяли?

 

[poiu]

А, простите, как Вы их применяли?

методом втирания. два раза в день после еды