DU4 - dalsi oficialni test

Odeslat odpověď

Smajlíci
:D :) :( :o :shock: :? 8) :lol: :x :P :oops: :cry: :evil: :twisted: :roll: :wink: :!: :?: :idea: :arrow: :| :mrgreen:
BBCode je zapnutý
[img] je zapnutý
[flash] je vypnutý
[url] je zapnuté
Smajlíci jsou zapnutí
Přehled tématu
   

Rozšířit náhled Přehled tématu: DU4 - dalsi oficialni test

Re: DU4 - dalsi oficialni test

od Pan Václav » 7. 12. 2012 03:02

Už je v oficialnich testech.

DU4 - dalsi oficialni test

od Him » 23. 12. 2009 00:17

Tento test neni v oficialnich testech u DU4, ale par lidi v nem melo chyby, tak ho sem davam, aby se zachoval pro "budouci generace":

Kód: Vybrat vše

program du4test9;

const
  c1=-20;
  c2='qwe';
  c3=false;
  c4=+1.2e3;

procedure proc2;
const
  c2=c1;
begin
end;

begin

end.
vystup:

out soubor:

Kód: Vybrat vše

Everything is OK
xml soubor:

Kód: Vybrat vše

<?xml version="1.0" encoding="UTF-8"?>
<symbol_tables>
	<types>
		<BOOLEAN type="T0"/>
		<INTEGER type="T1"/>
		<STRING type="T2"/>
		<REAL type="T3"/>
	</types>
	<labels>
	</labels>
	<symbols>
		<SKIND_TYPE name="BOOLEAN" type="T0"/>
		<SKIND_CONST name="C1" value="-20" type="T1"/>
		<SKIND_CONST name="C2" value="qwe" type="T2"/>
		<SKIND_CONST name="C3" value="0" type="T0"/>
		<SKIND_CONST name="C4" value="1200" type="T3"/>
		<SKIND_CONST name="FALSE" value="0" type="T0"/>
		<SKIND_TYPE name="INTEGER" type="T1"/>
		<SKIND_PROCEDURE name="PROC2">
			<parameters>
			</parameters>
			<labels>
			</labels>
			<symbols>
				<SKIND_CONST name="C2" value="-20" type="T1"/>
			</symbols>
		</SKIND_PROCEDURE>
		<SKIND_FUNCTION name="READI" type="T1">
			<parameters>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_FUNCTION>
		<SKIND_FUNCTION name="READR" type="T3">
			<parameters>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_FUNCTION>
		<SKIND_FUNCTION name="READS" type="T2">
			<parameters>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_FUNCTION>
		<SKIND_TYPE name="REAL" type="T3"/>
		<SKIND_TYPE name="STRING" type="T2"/>
		<SKIND_CONST name="TRUE" value="1" type="T0"/>
		<SKIND_PROCEDURE name="WRITEI">
			<parameters>
				<PMODE_BY_VALUE name="P" type="T1"/>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_PROCEDURE>
		<SKIND_PROCEDURE name="WRITELN">
			<parameters>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_PROCEDURE>
		<SKIND_PROCEDURE name="WRITER">
			<parameters>
				<PMODE_BY_VALUE name="P" type="T3"/>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_PROCEDURE>
		<SKIND_PROCEDURE name="WRITES">
			<parameters>
				<PMODE_BY_VALUE name="P" type="T2"/>
			</parameters>
			<labels>
			</labels>
			<symbols>
			</symbols>
		</SKIND_PROCEDURE>
	</symbols>
</symbol_tables>

Nahoru