vj1006 晴天小猪历险&egra

Vj1006 晴天小猪历险&egra

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
//±¾Ìâ×ß·¨¿ÉÒÔ´ÓµÚÒ»¸öµ½×îºóÒ»¸ö Ò²¿ÉÒÔ´Ó×îºóÒ»¸öµ½µÚÒ»¸ö //×óÉϺÍÓÒÉÏÊÇÖ¸Èý½ÇÐεÄ×ß·¨ ¶ø²»ÊÇת»»ºóµÄ×ß·¨ / //±ÉÈ˵ķ½·¨ //dp //µÚ i ²ã¿ÉÒÔÓÉÏÂÃæÒ»²ã×ßÀ´ µÚÒ»¸öºÍ×îºóÒ»¸öÓÐÌØÊâ×ß·¨ »¹¿ÉÒÔ±¾²ã´Ó×óµ½ÓÒ»ò´ÓÓÒµ½×ó //×¢Òâµ½»·µÄÎÊÌâ ÿ²ãÖеÄ×îСֵ±Ø¶¨²»ÄÜÓÉÁ½±ß¸üРËùÒÔ´ÓÕâ¸öµãÍùÁ½±ß¸÷ÍÆһȦ / //¿ÉÒÔ²ÉÈ¡´ÓÉÏÏòÏ»ò´ÓÏÂÏòÉÏ ×¢ÒⲻͬÍÆ·¨µÄ³õÖµ / const maxn=1000; var n:integer; g:array[0. .maxn,0. .maxn] of byte; f:array[0. .maxn,0. .maxn] of longword; function min(x,y:longword):longword; begin if x<=y then exit(x); exit(y); end; procedure init; var i,j:integer; begin readln(n); for i:=1 to n do for j:=1 to i do read(g[i,j]); end; procedure main; var i,j,minj:integer; mini:longword; begin for i:=1 to n do for j:=0 to i+1 do
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Background image of page 2
This is the end of the preview. Sign up to access the rest of the document.

This note was uploaded on 02/21/2011 for the course CS 001 taught by Professor 001 during the Spring '11 term at Shandong University.

Page1 / 2

Vj1006 晴天小猪历险&egra

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online