Люди!!!Мне нужны только блок схемы!сами программы есть.
1.Вычислить 9 значений функции у=х в кв.-сos альфа, где начальное значение альфа=-пи, а шаг дельта альфа=П\2, х=0,14483.
2.В данной действительной квадратной матрице порядка n найти сумму эл-ов строки, в которой расположен эл-т с наименьшим значениемю(такой эл-т один).
Очень-очень срочно нужно!К завтрашнему дню!
Полная версия: Блок схема
Если есть проги и при условии (с "натяжкой") что их автором являешься ты, то не понятен смысл вопроса.
Без всяких "натяжек",их автором являюсь не я!!!А ВЫ!!!!
И очень нужны блок схемы!
И очень нужны блок схемы!
APAL, обычно наоборот, программы строят по блок схемам или ТТС (типовым технологическим схемам), здесь ясно что программы нет 
Цитата
Без всяких "натяжек",их автором являюсь не я!!!А ВЫ!!!!
хех, как круто
APAL, прямо как гвоздь, да?
Без намеков сказала кто будет автором
Ну почему вы между собой переписываетесь?нет чтобы человеку помоч!!! 
Светка, выложи проги сюда пожалуйста
... или ссылку на топик где они решались ... :p2:
как я их выложу??они уже тут есть.
Цитата
как я их выложу??они уже тут есть.
Пальцем ткни
1.
2.
Пользуемся тегами [ code] [ /code] для исходников...
Код
Const x=0.14483;
Var Al : real
i : Byte;
Begin
Al:=0;
For i:=1 to 9 do
Begin
Writeln('Альфа = ',Al :9:5,' y= ',sqr(x)-cos(Al):9:5
Al:=Al+Pi/2;
End;
End.
Var Al : real
i : Byte;
Begin
Al:=0;
For i:=1 to 9 do
Begin
Writeln('Альфа = ',Al :9:5,' y= ',sqr(x)-cos(Al):9:5
Al:=Al+Pi/2;
End;
End.
2.
Код
Const n=4;
Var
m : array[1..n,1..n] of Real;
n,i,j : Byte;
k,s : Real;
Begin
k:=m[1,1];
n:=1; s:=0;
For j:=1 to n do
For i:=1 to n do
If m[i,j]<k then
Begin
k:=m[i,j];
n:=j;
End;
For i:=1 to n do s:=s+m[i,n];
Writeln(s:8:4);
End.
Var
m : array[1..n,1..n] of Real;
n,i,j : Byte;
k,s : Real;
Begin
k:=m[1,1];
n:=1; s:=0;
For j:=1 to n do
For i:=1 to n do
If m[i,j]<k then
Begin
k:=m[i,j];
n:=j;
End;
For i:=1 to n do s:=s+m[i,n];
Writeln(s:8:4);
End.
Пользуемся тегами [ code] [ /code] для исходников...
Ну и в чем проблемма?
Блок схему составлять умеем?
Блок схему составлять умеем?
Если б я в совершенстве владела"этим делом", я б не попросила помощи.Приблизительно, под чьим-то руководством могу это сделать, но одна НЕТ!Help! 
Ну ок, под руководством давай
вот для первой, не подумайте что я издиваюсь
вот для первой, не подумайте что я издиваюсь
Так классно!!!!!! :D :yes: :yes: :yes:
Только я немного не поняла, что в последнем овале!
:yes: :yes: :yes: Только я немного не поняла, что в последнем овале!
И еще в ромбике :p2:
Извини, просто как смог - ворд открывать лень было.
В овале последнем "ОСТАНОВ" в ромбе условие - i=10
Если да, то завершение программы, если нет, цикл повторяется..
:D
В овале последнем "ОСТАНОВ" в ромбе условие - i=10
Если да, то завершение программы, если нет, цикл повторяется..
:D
и еще - я не уверен, что вывод на экран это паралелограмм... просто схем со школы не чертил...
Пасиба!
А вторая че?
Параллелограмм обозначает ввод и вывод одновременно :yes:
А циклы ваще-то обозначаются квадратами со скошеными углами - такими
repeat:
___________
/ \
| |
|___________|
|
V
тело цикла
|
V
___________
| |
|усл. выхода|
\___________/
while:
___________
/ \
| усл.входа |
|___________|
|
V
тело цикла
|
V
___________
| |
| |
\___________/
for:
___________
/ \
| инит, шаг |
|___________|
|
V
тело цикла
|
V
____________
| |
|усл. выхода |
\____________/
А циклы ваще-то обозначаются квадратами со скошеными углами - такими
Код
repeat:
___________
/ \
| |
|___________|
|
V
тело цикла
|
V
___________
| |
|усл. выхода|
\___________/
while:
___________
/ \
| усл.входа |
|___________|
|
V
тело цикла
|
V
___________
| |
| |
\___________/
for:
___________
/ \
| инит, шаг |
|___________|
|
V
тело цикла
|
V
____________
| |
|усл. выхода |
\____________/
1 часть
2 часть
ну разобраться можно
ну разобраться можно
Digitalator, насколько я помню, точно установленного стандарта изображения нет. :D
ЧТо-то меня "косит" и "глючит" сегодня Я прямо не могу налюбоваться на мои блок схемы
ЧТо-то меня "косит" и "глючит" сегодня
Я прямо не могу налюбоваться на мои блок схемы
Да уж, красота, да и только!!!!!СПАСИБО!
Светка пожалуйста!
заходи еще!
заходи еще!
Цитата(Oleg_Z @ 17.12.04 19:50)
просто схем со школы не чертил...
А какой фак у тебя?,я уверен что связано в программированием :D и что вас не просят блоксхемы рисовать ?
Цитата
Digitalator, насколько я помню, точно установленного стандарта изображения нет.
Почему же? Конечно ГОСТом это не закреплено, но во всей встречаемой мной литературе используются именно такие обозначения и нигде другие. :no:
Цитата
Конечно ГОСТом это не закреплено
Хорошо Вам, у нас в республике этот ГОСТ имеется, только никто его в глаза е видел, а курсовую требую оформлять по стандарту
Цитата
А какой фак у тебя?,я уверен что связано в программированием и что вас не просят блоксхемы рисовать ?
нет, дело в том, что мы пишем довольно сложные программы, и писать к ним блоксхемы сложно - зато к каждой работе у насприлагается тетрадка 18 листов - разработка (мы ее сказкой называем)
там математическая постановка заачи, сетод решение, офисание спецификаии программы, "сценарий" алгоритм (на РАЯ) , код на Паскале.
ФАК электоники, специальность "интелектуальные системы обработки информации и управления"
(это на базе Атовматиз. сист. ..... создана)
Цитата(Oleg_Z @ 17.12.04 22:30)
ФАК электоники, специальность "интелектуальные системы обработки информации и управления"
(это на базе Атовматиз. сист. ..... создана)
у меня просто АСУ
)
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.