关于计算机编程pascal语言的入门(疑问)。 155
刚刚上了计算机语言的PASCAL,入门,有些疑问,跪求各位高手解难...1.请问read和write的具体区别是什么?书上的不好懂,请讲通俗点,最好举个例子。(请别长篇大...
刚刚上了计算机语言的PASCAL,入门,有些疑问,跪求各位高手解难...
1.请问read和write的具体区别是什么?书上的不好懂,请讲通俗点,最好举个例子。(请别长篇大论,表达自己的观点)
2.附上几道例题:
(1).已知△ABC中的三边长分别为25.76,74.03,59.31,求△ABC的面积
(2)某车棚存有自行车和三轮车共65辆,它们的轮子数合计为150个。求该棚内存有的自行车和三轮车各是多少辆?
(3)
甲、乙、丙三人分别有磁带36,48,64盒。先由甲把自己的磁带平均分为三份,分给乙、丙各一份,自己留下一份;接着是乙,最后是丙,都按甲的方法处理。编程输出甲、乙、丙在上述过程中各人的磁带数分别是多少? (输出所有的中间结果)
(4)
五位好朋友相聚。第一位朋友带来了很多糖块赠送给各位朋友,使每人的糖块在各自原有的基础上翻了一倍;接着第二位好友也同样向每人赠送糖块,他同样使每人的糖块在各人已有的数量上翻了一倍;第三、第四、第五位好友都照此办理。经过这样的赠送之后,每人的糖块恰好都为32块。问各位好友原先的糖块数分别是多少?
请写清楚过程,谢谢。
3.计算某次考试语文、数学、英语和计算机等四科的总成绩与平均成绩。
(请用输入语句从键盘输入各科成绩分) 这道题的请用输入语句从键盘输入各科成绩分是什么意思。
请电脑高手来,分不是问题,满意的可以再加,但绝对要原创,谢谢!!
我希望在今天可以给出答案,谢谢大家的帮助! 另外,请不要担心麻烦,看到答案后我不会立即采纳,请大家不要心急,我要的是好的答案,分无所谓,慢慢来解答。 展开
1.请问read和write的具体区别是什么?书上的不好懂,请讲通俗点,最好举个例子。(请别长篇大论,表达自己的观点)
2.附上几道例题:
(1).已知△ABC中的三边长分别为25.76,74.03,59.31,求△ABC的面积
(2)某车棚存有自行车和三轮车共65辆,它们的轮子数合计为150个。求该棚内存有的自行车和三轮车各是多少辆?
(3)
甲、乙、丙三人分别有磁带36,48,64盒。先由甲把自己的磁带平均分为三份,分给乙、丙各一份,自己留下一份;接着是乙,最后是丙,都按甲的方法处理。编程输出甲、乙、丙在上述过程中各人的磁带数分别是多少? (输出所有的中间结果)
(4)
五位好朋友相聚。第一位朋友带来了很多糖块赠送给各位朋友,使每人的糖块在各自原有的基础上翻了一倍;接着第二位好友也同样向每人赠送糖块,他同样使每人的糖块在各人已有的数量上翻了一倍;第三、第四、第五位好友都照此办理。经过这样的赠送之后,每人的糖块恰好都为32块。问各位好友原先的糖块数分别是多少?
请写清楚过程,谢谢。
3.计算某次考试语文、数学、英语和计算机等四科的总成绩与平均成绩。
(请用输入语句从键盘输入各科成绩分) 这道题的请用输入语句从键盘输入各科成绩分是什么意思。
请电脑高手来,分不是问题,满意的可以再加,但绝对要原创,谢谢!!
我希望在今天可以给出答案,谢谢大家的帮助! 另外,请不要担心麻烦,看到答案后我不会立即采纳,请大家不要心急,我要的是好的答案,分无所谓,慢慢来解答。 展开
7个回答
展开全部
1.. read是“读入语句”,write是“输出语句”,打个比方,写作业时将题目读入大脑,那些题目就相当于read进来的东西,而经过大脑的一些处理,你写出了答案,写出的东西就是write出的东西。
具体例子:{定义n,m:integer(整型);} read(n);就把一个程序执行时需要读入的东西读进来了,而write(m) 就是把m 里存的值输出了
2.. 第一题:
var a,b,c,p,s:real;//定义变量
begin//程序开始
a:=25.76; b:=74.03; c:=59.31;//给变量赋值
p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c));//海伦公式,知道吧?
if (a+b<c) or (a+c<b) or (b+c<a) then writeln('Data Error!') {判断能否构成三角形,不能就输出“Data Error”}
else writeln(s:0:2); {输出结果}
end.//结束程序
第二题
var a,s,i:integer; //定义变量
begin
for i:=1 to 65 do//循环变量,找一个符合条件的值
begin //以下表示每次循环需要做什么
if 2*i+(65-i)*3=150 then writeln(i);
end; {上面的writeln和write功能是一样的,只不过write输出一个东西后不换行,而writeln换行。这个"end;"与上面的begin对应,表示一段的结束而非整个程序的结束}
end.//程序结束
说明:1.“//”后的字和{}内的字起说明作用,程序运行时不会执行
2.第二题没啥意义嘛....笔算也能算出来
3.三四题和一二题相似,需要解答的话再来找我
第三个问题
输入语句就是“read”,意思就是说你编完整个程序后执行,程序需要你的输入数据,而键盘输入嘛...就是用键盘敲数字进去,敲进去的就是输入数据
还有什么不太明白的,竭诚为您解答
具体例子:{定义n,m:integer(整型);} read(n);就把一个程序执行时需要读入的东西读进来了,而write(m) 就是把m 里存的值输出了
2.. 第一题:
var a,b,c,p,s:real;//定义变量
begin//程序开始
a:=25.76; b:=74.03; c:=59.31;//给变量赋值
p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c));//海伦公式,知道吧?
if (a+b<c) or (a+c<b) or (b+c<a) then writeln('Data Error!') {判断能否构成三角形,不能就输出“Data Error”}
else writeln(s:0:2); {输出结果}
end.//结束程序
第二题
var a,s,i:integer; //定义变量
begin
for i:=1 to 65 do//循环变量,找一个符合条件的值
begin //以下表示每次循环需要做什么
if 2*i+(65-i)*3=150 then writeln(i);
end; {上面的writeln和write功能是一样的,只不过write输出一个东西后不换行,而writeln换行。这个"end;"与上面的begin对应,表示一段的结束而非整个程序的结束}
end.//程序结束
说明:1.“//”后的字和{}内的字起说明作用,程序运行时不会执行
2.第二题没啥意义嘛....笔算也能算出来
3.三四题和一二题相似,需要解答的话再来找我
第三个问题
输入语句就是“read”,意思就是说你编完整个程序后执行,程序需要你的输入数据,而键盘输入嘛...就是用键盘敲数字进去,敲进去的就是输入数据
还有什么不太明白的,竭诚为您解答
展开全部
入门嘛,上面的人全别听,听我的,隆重推荐,唯一推荐,唯一的真正的答案!我建议最好是从基础入手,而不是一开始就进行可视化编程。虽然如今国内绝大多数pc都是使用的windows,但是毕竟这知识这个世界的冰山一角。扎实的基础自然会更有用处。编程其实重要的是程序思维,然后是算法和数据结构。这些都是超出语言的,就是说不管是学c学java学delphi还是别的什么,这一部分都是一致的。因此培养这部分的知识可以说是一本万利的事情。初学肯定是通过语言熟悉思想熟悉算法和数据结构,到一定的时候就是纯粹的思想和算法数据结构的学习,便已经脱离程序语言了。经历过这些阶段,换一种语言不过是重新了解一下描述的方式,就像你了解了中文思维,山东话和四川话的差别就不会太大;了解了拉丁语的思维,整个语系的语言都不过是简简单单的记忆工作,应用就好。入门的语言,理论上是怎么方便学哪个,看那个顺眼学哪个。当然这里面还是有不同的推荐的。一般来说我比较推荐pascal、c/c++、java。并不是因为这三个东西很通用很有前途,而是它们实在是严整而有规则(c/c++还显得稍微的宽松了一点),而严谨的语法要求和明确的概念区分是有利于编程思维的形成和算法数据结构的学习的。同样的因为这个理由我不推荐vb,而并不是因为它功能不强大(事实上vb在windows环境中是相当牛的语言)另外一个建议是,如果学c,不要一开始就用vc。ms提供的很多东西很方便,有很多很简单的实现方法,但是它们不标准。vc与ansi c标准是有很大的差距的。首先一个不遵循标准的c/c++程序是不通用的,换个编译器说不定就不被承认了。所以我非常推崇gcc,理由之一是它完全符合 ansi c标准,无论它的c还是c++编译器都很严整,功能上一点也不缺乏(有人说gcc不能做图形界面的程序,这一点完全错误,到处都有的qt库和gtk库都能做出很好的界面),另外一个理由便是它免费,毕竟稍微大一点的软件企业就不会屈从与微软的编译器和平台,而一个免费的c编译器无疑可以创造更多的利益;就算要转vc,标准的c程序也是几乎不要作任何改动的。当然,这一切的前提是,你真的很想很好的学编程,做一个这方面的精英。如果只不过是兴趣,或者只是想拿一个ms的工程师认证然后在国内企业找份诸如设计vf、vb程序之类的工作,那完全可以忽略我上面的话,去找个认证培训班,认认真真听听课,好好完成练习,从vb或者vc入手,考好认证是很不会太难的。毕竟现在很多很好的大学里都从来不缺乏计算机的课程,不会缺少算法或者编译原理的课程,不会没有计算机科学的研究院,而那里面出来的人一般都具备了很好的基础知识,会更加容易成为前面所说的精英。
1.题:一个不换行一个要换行答案补充
比如说Console.WriteLine("a");Console.WriteLine("b")就会输出在2行的a b而 Console.Write("a");Console.Write("b")就在同一行输出a b.答案补充
read():读一个字符,如果到达stream末尾,则返回-1 readLine():是BufferedReader的方法,读一个以'\r'或'\n'结尾的串,如果到达末尾,则返回null答案补充
read返回的是int,readLine返回的是String
计算机编程问题先为你解答。
1.题:一个不换行一个要换行答案补充
比如说Console.WriteLine("a");Console.WriteLine("b")就会输出在2行的a b而 Console.Write("a");Console.Write("b")就在同一行输出a b.答案补充
read():读一个字符,如果到达stream末尾,则返回-1 readLine():是BufferedReader的方法,读一个以'\r'或'\n'结尾的串,如果到达末尾,则返回null答案补充
read返回的是int,readLine返回的是String
计算机编程问题先为你解答。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
read是从键盘上读入,而write是输出到屏幕。read(a),程序将会等待键盘输入,输入后把a的值设为输入的内容;write(a),程序将在屏幕上显示a的值,并不会让用户输入。注:使用write(a)时a必须有一个值。
2:
var
a,b,c,d:integer;
begin
read(a,b); {其中a为辆数,b为轮子数}
c:=3*a-b;
d:=a-c;
write(c,' ',d); {c为自行车数,d为三轮车数}
readln; {等待用户按回车}
end.
3:
var
jia,yi,bing:integer;
begin
read(jia,yi,bing);
jia:=jia div 3;
yi:=yi+jia;
bing:=bing+jia;
writeln(jia,' ',yi,' ',bing);
yi:=yi div 3;
jia:=jia+yi;
bing:=bing+yi;
writeln(jia,' ',yi,' ',bing);
bing:=bing div 3;
jia:=jia+bing;
yi:=yi+bing;
writeln(jia,' ',yi,' ',bing);
readln;
end.
4:
var
a,b,c,d,e,n:integer;
begin
read(n); {读取最后每个人的个数}
a:=n div 2;
b:=n div 2;
c:=n div 2;
d:=n div 2;
e:=n+a+b+c+d;
a:=a div 2;
b:=b div 2;
c:=c div 2;
e:=e div 2;
d:=d+a+b+c+e;
a:=a div 2;
b:=b div 2;
e:=e div 2;
d:=d div 2;
c:=c+a+b+d+e;
a:=a div 2;
c:=c div 2
2:
var
a,b,c,d:integer;
begin
read(a,b); {其中a为辆数,b为轮子数}
c:=3*a-b;
d:=a-c;
write(c,' ',d); {c为自行车数,d为三轮车数}
readln; {等待用户按回车}
end.
3:
var
jia,yi,bing:integer;
begin
read(jia,yi,bing);
jia:=jia div 3;
yi:=yi+jia;
bing:=bing+jia;
writeln(jia,' ',yi,' ',bing);
yi:=yi div 3;
jia:=jia+yi;
bing:=bing+yi;
writeln(jia,' ',yi,' ',bing);
bing:=bing div 3;
jia:=jia+bing;
yi:=yi+bing;
writeln(jia,' ',yi,' ',bing);
readln;
end.
4:
var
a,b,c,d,e,n:integer;
begin
read(n); {读取最后每个人的个数}
a:=n div 2;
b:=n div 2;
c:=n div 2;
d:=n div 2;
e:=n+a+b+c+d;
a:=a div 2;
b:=b div 2;
c:=c div 2;
e:=e div 2;
d:=d+a+b+c+e;
a:=a div 2;
b:=b div 2;
e:=e div 2;
d:=d div 2;
c:=c+a+b+d+e;
a:=a div 2;
c:=c div 2
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
{}指注释
+我Q:346330284, 我教你
1.
read指读入,write指输出。使用read语句后,程序进入等待状态,当你在运行到read命令后,输入一个(段)字符串(数字),则执行下面的语句。
使用write语句后,在运行界面则会显示出你所要输出的字符串。
如:
Program abc;
Var
a:integer;
Begin
Read(a); {读入一个数,存入变量a中}
Write(
+我Q:346330284, 我教你
1.
read指读入,write指输出。使用read语句后,程序进入等待状态,当你在运行到read命令后,输入一个(段)字符串(数字),则执行下面的语句。
使用write语句后,在运行界面则会显示出你所要输出的字符串。
如:
Program abc;
Var
a:integer;
Begin
Read(a); {读入一个数,存入变量a中}
Write(
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
pascal很简单的,关键是入门,你找个身边的学长教你更容易些。搞会if for while 就基本入门了,在搞其它的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询