王朝知道

分享

 

01.关于Pascal语言的习题
function max(a,b,c:double):double;beginif a>b then if a>c then max:=a else max:=celse if b>c then max:=b else max:=c;end;大致就是这样了，可能语法有毛病自己改一下吧...查看完整版>>关于Pascal语言的习题02.关于PASCAL的语言的一道程序题
var t,n,i,j : longint r,d : real begin repeat write(`N= _?_`) 输入提示readin(n) until___((n>0)AND(n<=50))___; 判断所输入的N是否适合要求0<N<=50 __j:=(2*n-1)/2__; r:=__j__; ...查看完整版>>关于PASCAL的语言的一道程序题03.关于C语言的一道习题!
提示已经说得很明显了提示:设5个字符型变量,存放5个字符,经运算使各ASCII码增4,再输出...查看完整版>>关于C语言的一道习题!04.c语言的问题,关于谭浩强的<<c程序设计>>的11.8习题
看得有点晕，没发现什么太大的区别啊，就觉得你的creat函数，只需要输入0就结束了，谭的输入0以后还要输入一个多余的数据，因此你的creat函数比较人性化一点。...查看完整版>>c语言的问题,关于谭浩强的<<c程序设计>>的11.8习题05.急求大量C或PASCAL习题（越多越好）
应试吧 楼主！还是好好学学吧这样不用背得这么辛苦...查看完整版>>急求大量C或PASCAL习题（越多越好）06.拉丁矩阵(Pascal语言)
program latin;var a,b:array [1..9,1..9]of boolean;g:array [1..9,1..9] of byte;t,s,h,n:integer;procedure print;var i,j:integer;begin for i:=1 to n do begin for j:=1 to n do write(g[i,j]:4); writeln;...查看完整版>>拉丁矩阵(Pascal语言)07.介绍一下pascal语言!
以下内容转自百度百科1、关于Turbo Pascal Pascal是一种计算机通用的高级程序设计语言。它由瑞士Niklaus Wirth教授于六十年代末设计并创立。 以法国数学家命名的Pascal语言现已成为使用最广泛的基于DOS的语言之一，其...查看完整版>>介绍一下pascal语言!08.pascal语言程序设计的问题
program DrawStars(input, output);var m, n, i: Integer;begin for n := 1 to 9 do begin m := Abs(5-n); { 计算空格数 } for i := 1 to m do Write(' '); { 打印空格 ...查看完整版>>pascal语言程序设计的问题09.请用PASCAL语言解决下面问题
program wen;vara,s,x,y,z:longint;beginread(x,y,z);for a:=1 to z do;if a*(x+y)-12=z then write(a*x-23,a*y+11:15);end....查看完整版>>请用PASCAL语言解决下面问题10.会PASCAL语言的来!
var i,j,k:integer; n,a,b,c,max:integer; x,y,z:integer;begin readln(n); for i:=1 to n div 4 do for j:=1 to n div 5 do for k:=1 to n div 6 do if (n-i*4-j*5-k*6=0)and(i+j+k>max) then begin ...查看完整版>>会PASCAL语言的来!

 

 

免责声明：本文为网络用户发布，其观点仅代表作者个人观点，与本站无关，本站仅提供信息存储服务。文中陈述内容未经本站证实，其真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。