Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)
Paste
Pasted by тиреч ( 16 years ago )
PROGRAM
VAR_INPUT x : REAL; END_VAR
VAR_INPUT y : REAL; END_VAR
VAR_INOUT koord : STRING; END_VAR
IF x>0.0 THEN
IF y>0.0 THEN koord:="Первая четверть";
ELSIF y<0.0 THEN koord:="Четвёртая четверть";
ELSE koord:="Ось x";
END_IF;
ELSIF x<0.0 THEN
IF y>0.0 THEN koord:="Вторая четверть";
ELSIF y<0.0 THEN koord:="Третья четверть";
ELSE koord:="Ось x";
END_IF;
ELSIF x==0.0 THEN
IF y==0.0 THEN koord:="Перечечение осей";
ELSE koord:="Ось y";
END_IF;
END_IF;
END_PROGRAM
Revise this Paste