Здравствуйте, гость ( Вход | Регистрация )
![]() ![]() |
| Ino4ka |
9.12.2008, 0:46
Сообщение
#1
|
|
Пользователь Группа: Пользователи Сообщений: 6 Регистрация: 9.12.2008 Пользователь №: 21 125 |
Здравствуйте!
Вот программа CLS Rem Цикл For X = 0 To 2 Step 0.2 C=(1+SQR(1+X^2))/(1+SQR(ABS(1-X^2))) If X>= 1 Then Y = C+ (X/(1+X ) Else Y = C+ (X/(1-X ) выделяет эту строку и пишет что делить на 0 нельзя что именно не правильно,может чего то не хватает? End If Print "Y("; X; ")="; Y Next X End И помогите составить блок -схему к этой проге Если честно я вообще не знаю как и на чем строить блок -схемы! заранее спасибо!) Прикрепленные файлы
__________.bmp ( 91.46 килобайт )
Кол-во скачиваний: 61 |
| PolPoll |
10.12.2008, 18:00
Сообщение
#2
|
![]() :) Группа: Главные администраторы Сообщений: 5 858 Регистрация: 24.11.2005 Из: Москва Пользователь №: 5 327 |
Код Y = C+ (X/(1-X ) выделяет эту строку и пишет что делить на 0 нельзя что именно не правильно,может чего то не хватает? в этой конктретной строке скобки не хватает, так же как и в строке Код Y = C+ (X/(1+X ) а деление на 0 тут может появиться, если в строке Код If X>= 1 Then забыть равенство поставить, напримерАлгоритмизация и блок-схемы http://fvn2009.narod.ru/Manuscripts/Algori...orithm8.htm#SS2 http://www.rusedu.info/Article492.html -------------------- |
| Ino4ka |
13.12.2008, 3:42
Сообщение
#3
|
|
Пользователь Группа: Пользователи Сообщений: 6 Регистрация: 9.12.2008 Пользователь №: 21 125 |
а что блок схемы рисуются в ручную? тоесть составляются)
в word arte можно сделать,как Вы думаете?) просто там есть эти фигуры из которых состоит блок -схема ) заранее спс*) |
| Denis |
13.12.2008, 11:21
Сообщение
#4
|
|
Пользователь Группа: Пользователи Сообщений: 1 081 Регистрация: 24.1.2005 Пользователь №: 1 933 |
для такой программки пойдет и word'овская рисовалка. только не WordArt, а панель инструментов Рисование (Вид->Панели инструментов->Рисование). В Автофигуры->Блок-схемы найдешь типовые блоки.
|
| Ino4ka |
15.12.2008, 21:38
Сообщение
#5
|
|
Пользователь Группа: Пользователи Сообщений: 6 Регистрация: 9.12.2008 Пользователь №: 21 125 |
Как по вашему правильна ли блок схема?
если есть ошибки укажите на них пжл) Прикрепленные файлы
__________.bmp ( 425.19 килобайт )
Кол-во скачиваний: 55 |
| PolPoll |
16.12.2008, 16:41
Сообщение
#6
|
![]() :) Группа: Главные администраторы Сообщений: 5 858 Регистрация: 24.11.2005 Из: Москва Пользователь №: 5 327 |
Как по вашему правильна ли блок схема? если есть ошибки укажите на них пжл) где цикл? почему блоки пустые? -------------------- |
| Ino4ka |
16.12.2008, 20:12
Сообщение
#7
|
|
Пользователь Группа: Пользователи Сообщений: 6 Регистрация: 9.12.2008 Пользователь №: 21 125 |
1 ) Зачем вводить a,x? 2) где цикл? 3) почему блоки пустые? 1)так как я не разбираюсь сделала как в примере который дан в методичке 2) ??? 3) блоки пустые так как у меня возникли трдности с заполнением (в плане корней и тд и тп ) там у меня вопрос так как я не знаю что туда вводить вот заполненная (если так можно сказать) ![]() |
| PolPoll |
17.12.2008, 8:23
Сообщение
#8
|
![]() :) Группа: Главные администраторы Сообщений: 5 858 Регистрация: 24.11.2005 Из: Москва Пользователь №: 5 327 |
Блок схема строится не абстрактно, а к твоей проге, как ты в конце и приписала
CLS Rem Цикл For X = 0 To 2 Step 0.2 C=(1+SQR(1+X^2))/(1+SQR(ABS(1-X^2))) If X>= 1 Then Y = C+ (X/(1+X )) Else [b]Y = C+ (X/(1-X )) End If Print "Y("; X; ")="; Y Next X End И помогите составить блок -схему к этой проге По строчкам: -----------------блок начала CLS -- пропускаем Rem Цикл -- пропускаем For X = 0 To 2 Step 0.2 --сразу несколько блоков!!!! в прямоугольнике x=0, затем в ромбе с 2 выходами (да/нет) условие x<=2, и в конце цикла будет прямоугольник с x=x+0.2 ---- далее по ветке ДА C=(1+SQR(1+X^2))/(1+SQR(ABS(1-X^2))) -- в прямоугольнике If X>= 1 Then -- в ромбе с 2 выходами: Y = C+ (X/(1+X )) -- в прямоугольнике по ветке ДА Else [b]Y = C+ (X/(1-X )) -- в прямоугольнике по ветке НЕТ End If -- соединяем ветки Print "Y("; X; ")="; Y -- в параллелограмме вывод Next X -- конец цикла: перед ним упонянутое выше (x=x+0.2) и стрелка к началу цикла (между x=0 и x<=2) ---- по ветке НЕТ выходим из цикла и End -- блок конца блок-схемы -------------------- |
| Ino4ka |
21.12.2008, 22:37
Сообщение
#9
|
|
Пользователь Группа: Пользователи Сообщений: 6 Регистрация: 9.12.2008 Пользователь №: 21 125 |
уже сижу над этой схемой 2 дня
так будет выглядить? (или я как всегда напутала?) ![]() сорри что блоки не заполнены так как на это у меня уйдет много времени только не пойму как их соеденить я вообще запуталась с блоками какой куда-вроде делаю по описанию но потом путаюсь (не пойму сколько должно быть ромбов, прямоугольных блоков (Я совсем запуталась!) HELP ME!!! простите что так Вас достаю! (я вообще нифига в этом не понимаю я зачет сдать по любому надо) Сообщение отредактировал Ino4ka - 22.12.2008, 0:04 |
| Denis |
22.12.2008, 7:13
Сообщение
#10
|
|
Пользователь Группа: Пользователи Сообщений: 1 081 Регистрация: 24.1.2005 Пользователь №: 1 933 |
вот слова PolPoll'а
Прикрепленные файлы
Doc1.rar ( 3.5 килобайт )
Кол-во скачиваний: 67 |
| Ino4ka |
22.12.2008, 7:53
Сообщение
#11
|
|
Пользователь Группа: Пользователи Сообщений: 6 Регистрация: 9.12.2008 Пользователь №: 21 125 |
Denis спасибо большое!!!! PolPoll - Вам огромнешее спасибо!!! Ребята,знали бы Вы, как выручили!!)) Спасибо!!! |
![]() ![]() |
|
Текстовая версия | Сейчас: 23.5.2012, 3:41 |