Имеется код на ЯВУ Pascal. Как описать его средствами IDE OwenLogic?

[Дмитрий_Кирсанов]

Имеется код на ЯВУ Pascal:



IF tmp1
THEN
BEGIN {tmp1}
IF NOT(D) AND U
THEN
BEGIN {NOT(D) AND U}
D := 1;
U := 0
END {NOT(D) AND U}
ELSE
IF D AND NOT(U)
THEN
BEGIN {D AND NOT(U)}
D := 0;
U := 1
END {D AND NOT(U)}
END; {tmp1}


Мог бы кто-нибудь мне помочь описать его средствами IDE OwenLogic?

[Дмитрий_Кирсанов]

квадратиками что-ли?

да, квадратиками

[Дмитрий_Кирсанов]

тут не хватает куска кода, это будет генератор, меняющий состояние каждый цикл

по-моему, всё в самый раз

[Sergey666]

да, квадратиками

Ну, раз квадратиками- переводите в алгоритмический вид, т.е в гостовский графический вид блок схем алгоритмов и из квадратиков в квадратики самостоятельно, вдруг понравится...

[Дмитрий_Кирсанов]

Ну, раз квадратиками- переводите в алгоритмический вид, т.е в гостовский графический вид блок схем алгоритмов и из квадратиков в квадратики самостоятельно, вдруг понравится...

эксперт пожаловал

[Sergey666]

эксперт пожаловал
Индусы, мне до лампочки что вы там пишете...
Во первых, кто такой " код на ЯВУ Pascal"???
Приведенный код имеет все признаки индусского программирования, поэтому целесообразно привести его в "человеческий" вид, а далее хоть квадратиками, хоть как...

это будет генератор, меняющий состояние каждый цикл
Это-ж надо было сделать это так ...по индусски

[Валенок]

..............

[Дмитрий_Кирсанов]

Написано ужасно, да)) Может это машина родила?
Но сам генератор управляемый. В п#3 привел его же если что

спасибо за подробный ответ

[игорь68]

Любимая кнопка программистов -копировать и вставить.

[Филоненко Владислав]

Имеется код на ЯВУ Pascal:



IF tmp1
THEN
BEGIN {tmp1}
IF NOT(D) AND U
THEN
BEGIN {NOT(D) AND U}
D := 1;
U := 0
END {NOT(D) AND U}
ELSE
IF D AND NOT(U)
THEN
BEGIN {D AND NOT(U)}
D := 0;
U := 1
END {D AND NOT(U)}
END; {tmp1}


Мог бы кто-нибудь мне помочь описать его средствами IDE OwenLogic?

Запишитесь в бета-тестеры ОвенLogic c ST-языком. ST - брат-близнец Pascal