برنامه زیر مثلث عددی به صورت شکل زیر است:
1 1 2 1 1 2 3 2 1 1 2 3 4 3 2 1 1 2 3 4 5 4 3 2 1
این برنامه با پاسکال نوشته شده... برای مشاهده سورس برنامه به ادامه مطلب مراجعه فرمایید.
برنامه زیر مثلث عددی به صورت شکل زیر است: 1 1 2 1 1 2 3 2 1 1 2 3 4 3 2 1 1 2 3 4 5 4 3 2 1
این برنامه با پاسکال نوشته شده...
program mosallas; uses crt; var i,j,k,f,g:Integer; BEGIN textcolor(7); textbackground(1); clrscr; j:=8; for i:=1 to 5 do begin for g:=1 to j do write(' '); for k:=1 to i do write(k,' '); for f:=( i-1) downto 1 do write(f,' '); j:=j-2; writeln; end; readln; end. |