用pascal打印“*”字三角形. 打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 时

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 14:20:22
用pascal打印“*”字三角形.        打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 时

用pascal打印“*”字三角形. 打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 时
用pascal打印“*”字三角形.
 
       打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 时
 

 

用pascal打印“*”字三角形. 打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 时
program hello;
var a,b,c,d,e:integer;
begin
writeln('please input a number between 1 and 9');
readln(a);
for b:= 1 to a do
begin
for e:=1 to a-b do
begin
write(' ');
end;
for c:=1 to 2*b-1 do
begin
write('*');
end;
write(' ');
for d:=1 to 2*a+1-2*b do
begin
write('*');
end;
writeln;
end;
readln;
end.
我是用的TP编译的,你可以放到txt文档里,再把拓展名改为pas用.要不就用free pascal直接从windows里面复制过去.我都试过了,应该是没有问题的.
PS.pascal语言有点老了,建议该学Cpp吧.

用pascal打印“*”字三角形. 打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 时 用pascal打印“*”字三角形. 打印“*”字三角形:从键盘输入一个自然数N(1≤N≤9),根据N的值,打印输出对应的“*”字三角形,例如: N = 4 用VB按金字塔形状打印杨辉三角形要求打印前8行, pascal打印一个星号右三角形.Description 打印一个星号右三角形.Input 一个整数nOutput 输出图形Sample Input 3Sample Output * *****Source 在线等答案!@! 用pascal语句打印下列图形:1 121 12321 1234321 12321 121 1 用PASCAL打印下列图形aa ba b c....a b c .y z free pascal语言.打印下列图形(共4个).用循环.88888888881121123211234321#空空空空@#空空@@###@@@ 教我一道turbo pascal题目题目是从键盘输入一个整数X(X 不超过 10000),若X的各位数字之和为7的倍数,则打印YES',否则中打印NO用turbo pascal格式回答 PASCAL 打印 1 121 12321 1234321 123454321 12345654321 pascal打印数字图形读入一个整数n(n Pascal 制作三角形结果:1222333334444444555555555 用vb.net2008打印杨辉三角形(打印10行),要求如图所示 用C#打印出杨辉三角形,打印出10行?是输出,不好意思 打印下列图形!用pascal做!6、 1 2 4 7 11 16 223 5 8 12 17 236 9 13 18 2410 14 19 2515 20 2621 2728用pascal打印出来!别只给我个打印!要做! 输入三角形的三个边,判断它是何类型的三角形.用pascal语言 用java中的(for循环)打印如下三角形图形: ***** **** *** ** * 利用队列打印出n行杨辉三角形.用C语言 用for循环打印倒三角形及菱形