diziler_sayı yazdırma

PROGRAM diziler2;

VAR i,j:integer;

SIRA : ARRAY [0..4] of integer;

BEGIN
writeln ('bes tane tam say girin');


for i:=0 to 4 do

begin



READLN(SIRA[i]);

end;

for i:=4 downto 0 do

begin
writeln('SIRA= ', SIRA[i]);

end;





READLN;

END.