编程输出下列图形,行数从键盘读入 当n=5时,* *** ***** *** *
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/11/08 09:43:11
编程输出下列图形,行数从键盘读入 当n=5时,* *** ***** *** *
图形*
***
*****
***
* 是Pascal语言
图形*
***
*****
***
* 是Pascal语言
注意,我的比1、2、3楼的都简单,还是pascal
var
n,k,p,i,j:integer;
begin
readln(n);
k:=n div 2; //初始空格数
p:=1; //初始打印字数
for i:=1 to (n div 2) do //先做前一半行的打印
begin
for j:=1 to k do write(' '); //输出空格
for j:=1 to p do write('*'); //输出星号
writeln; //输出回车
dec(k); inc(p,2); //相当于k:=k-1; p:=p+2;
//因为每增加一行,空格减少一个,星号也增加两个
end;
for i:=1 to n do write('*'); //输出中间的星号
writeln; //输出回车
//因为打印是对称的,所以不用初始化k,p
for i:=1 to (n div 2) do //再做后一半行的打印
begin
for j:=1 to k do write(' '); //输出空格
for j:=1 to p do write('*'); //输出星号
writeln; //输出回车
inc(k); dec(p,2); //相当于k:=k+1; p:=p-2;
//因为每增加一行,空格增加少一个,星号也减少两个
end;
end.
var
n,k,p,i,j:integer;
begin
readln(n);
k:=n div 2; //初始空格数
p:=1; //初始打印字数
for i:=1 to (n div 2) do //先做前一半行的打印
begin
for j:=1 to k do write(' '); //输出空格
for j:=1 to p do write('*'); //输出星号
writeln; //输出回车
dec(k); inc(p,2); //相当于k:=k-1; p:=p+2;
//因为每增加一行,空格减少一个,星号也增加两个
end;
for i:=1 to n do write('*'); //输出中间的星号
writeln; //输出回车
//因为打印是对称的,所以不用初始化k,p
for i:=1 to (n div 2) do //再做后一半行的打印
begin
for j:=1 to k do write(' '); //输出空格
for j:=1 to p do write('*'); //输出星号
writeln; //输出回车
inc(k); dec(p,2); //相当于k:=k+1; p:=p-2;
//因为每增加一行,空格增加少一个,星号也减少两个
end;
end.
编程输出下列图形,行数从键盘读入 当n=5时,* *** ***** *** *
打印杨辉三角形编程打印如下形式的杨辉三角形,(输出整数时以 %5d 作为格式控制),行数由键盘读入,少于 10 行. 1
箭头行数n由键盘输入(下列中n分别为3和5),编程打印输出以下图案.
C语言 编程输出下列高度为n的图形(当n=5时) 1 3 4 10 11 2 5 9 12 6 8 13 7 14 15
编程输出下列高度为n 的图形.
用c语言编程,要求从键盘读入一个由单词和空格组成的英文长句,分解其中单词,并按照字典顺序排列输出
c语言编程 图形输出 描述:输入一个字符及行数n,用该字符在屏幕上输出如下图形:* *** *
编程输出下列数字图案(行数由键盘输入)
C语言:请编写一个程序,从键盘读入两个整数a和n,计算并输出a+aa+aaa+...+aa...a(n个a)的值.
c语言:从键盘任意输入一个整数n,编程计算并输出1-n之间的所有素数之和
MATLAB中当n>矩阵行数时怎么输出最后一行元素并给出出错信息
pascal输入下列图形,行数n由键盘输入(下图中n=4)