06.05.2014, 20:36 | #1 (permalink) |
Новичок
Регистрация: 06.05.2014
Сообщений: 6
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Паскаль
в школе препод топит заданиями... а оценка в аттестат идет |
06.05.2014, 20:36 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Наверняка вы найдете важное в решении проблемы, если полистаете похожие темы Паскаль Паскаль Паскаль Паскаль |
06.05.2014, 20:49 | #2 (permalink) |
Новичок
Регистрация: 06.05.2014
Сообщений: 6
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
я уже и просто уравнения решала, и переводила на язык паскаль каждую переменную и в турбо паскале пыталась ввести, прочитала все советы в инете. но всё впустую, увы
как понять что такое оператор, и где составлять блок-схему? |
07.05.2014, 05:59 | #3 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,797
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
В общем так. Берете учебник по информатике, открываете раздел "Алгоритмизация и программирование" и читаете, читаете, читаете...
Потом загружаете Pascal и пишите, пишите, пишите... Можно также воспользоваться справочными материалами среды разработки. Да и для того, чтобы по этому языку программирования, нужно не меньше пары сотен лет, это как минимум. Думаю, у вас такого срока нет, поэтому рекомендую начать с прочтения этих материалов: http://www.tehnari.ru/531355-post1.html Далее: по первому алгоритму: запрашиваете значение x, используете его для вычисления значения y. Затем с помощью вложенной структуры ветвления вычисляете значение F(y). по второму алгоритму: очевидно, что данный график задан тремя функциями от минус бесконечности до -R функция y=0 от -R до +R функция окружности +R до плюс бесконечности функция y=x-R Программу пишите сами.
__________________
Убить всех человеков! |
07.05.2014, 16:43 | #5 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Ничего, не отчаивайтесь.
Прежде всего - просьба: сохраняйте программы в файлы и выкладывайте сюда через copy-paste в текстовом виде, а не в виде картинки, чтобы мы могли с этими листингами работать. Теперь по самой программе. Даже не вдаваясь в суть Ваших действий (а всегда ОЧЕНЬ желательно видеть, какую задачу решает выложенная программа), отмечу следующее. Обратите внимание на ПРАВИЛЬНОСТЬ РАССТАНОВКИ СКОБОК - у Вас с этим явные проблемы. Главный критерий: в каждом операторе число открывающих скобок должно в точности равняться числу закрывающих. А у Вас? В строке вычисления а 4 открывающих и 3 закрывающих, в строке вычисления y - 6 открывающих и 4 закрывающих! Кроме того, readkey - это команда модуля CRT, а где у Вас uses CRT? Нету. В общем - программирование неряшливости и "коекакерства" не прощает. Успехов! |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
07.05.2014, 17:03 | #6 (permalink) |
Новичок
Регистрация: 06.05.2014
Сообщений: 6
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
вот текст программы, скобки исправила. в общем, эта программа должна вычислить величины у(х) и 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. |
08.05.2014, 09:46 | #9 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
А вот это - зря! На самом деле, ничего сложного там нет. Просто много внимательности, немного усидчивости и малая толика базовых знаний - дальше всё как по маслу покатится!А, простите, как Вы их применяли?
|
08.05.2014, 10:47 | #10 (permalink) | |
Member
Регистрация: 05.03.2014
Сообщений: 200
Сказал(а) спасибо: 2
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 834
|
Цитата:
|
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|