pascal数星星问题,【试题描述】 天空非常晴朗,外面很静很静,连小虫儿的鸣叫声都能听见.天就渐渐变黑了,天空中出现了一颗颗星星,它们一闪一闪的好像在眨着眼睛又好像在向我述说着什么似

来源:学生作业帮助网 编辑:作业帮 时间:2024/03/28 22:14:07
pascal数星星问题,【试题描述】 天空非常晴朗,外面很静很静,连小虫儿的鸣叫声都能听见.天就渐渐变黑了,天空中出现了一颗颗星星,它们一闪一闪的好像在眨着眼睛又好像在向我述说着什么似

pascal数星星问题,【试题描述】 天空非常晴朗,外面很静很静,连小虫儿的鸣叫声都能听见.天就渐渐变黑了,天空中出现了一颗颗星星,它们一闪一闪的好像在眨着眼睛又好像在向我述说着什么似
pascal数星星问题,
【试题描述】
天空非常晴朗,外面很静很静,连小虫儿的鸣叫声都能听见.天就渐渐变黑了,天空中出现了一颗颗星星,它们一闪一闪的好像在眨着眼睛又好像在向我述说着什么似的.望着,望着,我就禁不住要数星星了,一颗,两颗,三颗,四颗,五颗……数着,数着,就分不清哪些数过了,哪些还没数过.你能帮忙数清天上有几颗星星吗?
【输入描述】
有多组测试数据.每组开头有两个整数M,N(0 < M,N

pascal数星星问题,【试题描述】 天空非常晴朗,外面很静很静,连小虫儿的鸣叫声都能听见.天就渐渐变黑了,天空中出现了一颗颗星星,它们一闪一闪的好像在眨着眼睛又好像在向我述说着什么似
var n,m,i,j,ans:longint;
ch:char;
begin
readln(n,m);
while not((n=0)and(m=0)) do begin
ans:=0;
for i:=1 to n do begin
for j:=1 to m do begin
read(ch);
if ch='*' then inc(ans);
end;
readln;
end;
readln(n,m);
writeln(ans);
end;
end.

pascal数星星问题,【试题描述】 天空非常晴朗,外面很静很静,连小虫儿的鸣叫声都能听见.天就渐渐变黑了,天空中出现了一颗颗星星,它们一闪一闪的好像在眨着眼睛又好像在向我述说着什么似 pascal函数找回文数试题描述】 找出10000以内的回文数. 从左向右读与从右向左读是同一个数的数为回文数,如19391是回文数.【输入描述】 无【输出描述】 输出只有一行,包括所有符合条件的回 【入门】求数II pascal【试题描述】 在1—500中,找出能同时满足用3除余2,用5除余3,用7除余2的所有整数【输入描述】 无【输出描述】 若干个数 每行一个 pascal编程计算输入数中偶数的平均值 输入数据以-1结束试题描述 编程计算所有输入的数中偶数的平均值.输入数据以-1结束.输入要求 一行,若干个数输出要求 一行,一个数,保留两位小数输入 Pascal:用自然语言描述算法:判断数N是否为素数 pascal编程:方格取数题目描述设有N*N的方格图(N 回形矩阵 pascal[问题描述] 从键盘输入正整数n,i,j,( l 工 作(work.pas) pascal【问题描述】当前有n(n 十六进制转换,请用free Pascal语言编写代码?【试题描述】 输入一个不超过100000位的十六进制数,请转换成八进制数.注:十六进制数中,字母0-9还对应表示数字0-9,字母“A”(大写)表示10,“B” pascal题!莱布尼茨三角形!更好100!急……最好有解释!试题描述 世界上著名的莱布尼茨三角形如图所示,请编程输出图中排在第n行从左边数第m个位置上的数.输入共一行,有二个整数N 和M(N<=15), 问一下程序,pascal的.K尾相等数 难度级别:D; 运行时间限制:1000ms; 运行空间限制:51200KB; 代码长度限制:2000000B 试题描述从键盘输入一个正整数K,若存在自然数M和N(M>N),使得K^M和K^N均 后n-1位数 用pascal试题描述已知w是一个位数不大于1000的无符号整数,若w是n(n≥2)位的整数,则求出w的后n-1位的数.输入输入中包括一个无符号整数w.输出w对应的n-1位数(忽略前缀0).如果除了最 Pascal整数拆段试题描述将一个位数为L(4≤L≤10)的自然数N拆成4段,使各段对应的数的乘积最小.你能编一个程序实现吗?输入要求一个自然数N输出要求一个整数,最小乘积输入样例321427输出样 矩阵相似问题 pascal【试题描述】 给出2个大小相同的矩阵方阵A,B,方阵中的元素为0或1.若A和B相似,满足下面条件:① A=B 相等,则输出0 ② A经过顺时针旋转90°成为B,则输出1 ③ A经过顺时针旋转180 矩阵相似问题 pascal【试题描述】 给出2个大小相同的矩阵方阵A,B,方阵中的元素为0或1.若A和B相似,满足下面条件:① A=B 相等,则输出0 ② A经过顺时针旋转90°成为B,则输出1 ③ A经过顺时针旋转180 pascal亲密数对亲密数对时间限制:1秒 内存限制:64 MB试题描述键盘输入N,N在2至2000之内,求2至N中的亲密数对,就是A的因子和等于B,B的因子和等于A,并且A≠B.如48和75是亲密数对.48的因子和为2+3+4+6+8 pascal程序(序列)问题描述 有一个非递减的整数序列S1,S2,S3,……,Sn+1(Si 求n个数的最大值和最小值(pascal)【试题描述】 任意输入n个整数,把它们的最大值,最小值求出来.【输入描述】 输入只有一行,包括一个整数n(1