Pascal语言计算s=12-22+32-42+52.-1002

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/28 18:55:24
Pascal语言计算s=12-22+32-42+52.-1002

Pascal语言计算s=12-22+32-42+52.-1002
Pascal语言计算s=12-22+32-42+52.-1002

Pascal语言计算s=12-22+32-42+52.-1002
var i,n:longint;
begin
for i:=1 to 100 do
if i mod 2=0 then n:=n-i*10-2 else n:=n+i*10+2;
writeln('s=',n);
end.

Pascal语言计算s=12-22+32-42+52.-1002 pascal编程计算并输出12+22+32+.+1002大神求解!急! 计算S=1+3+5……+97+99 pascal 计算式子的值:s=1+2+3+...+100(编程 pascal语言 for语句)这是我编的:var a,s,i:integer;begins:=0;beginfor i:=1 to 10 do;readln(a);a:=1+i;s:=s+i;end;writeln(s:10)end. pascal语言“s:=s+i/((i-3) div2);”哪错了; i,s均为real; 它说“got Real expected Longint 用pascal语言的while循环求s=1+2+3+...+10跪求,简单一点,我是初学者还有几题:用while循环s=1+1/2+1/3+...+1/100;计算n!,其中n键盘输出输入任意自然数a,b,求a,b最小公倍数小球从100高处自由落下,着地后 pascal语言:输入一个正整数,计算它各数位之和(数字数位不限,类型为longint) C语言.计算S=1-1/12+1/22-1/32+1/42……-1/102的值,并输出请问程序写对了吗 Pascal语言编程:某梯形的上底、下底和高分别为8,12,9,求该梯形的面积.下面是我自己写出来的,我新学的,帮我看下,有没有错,错在哪?var s:integer;beginwrite('s=');readln(s);s:=(8+12)*9/2;writeln{'s=',(8+12)*9/2}; c语言编程计算s=3!+6!+9!+12!+15!+.+18! c语言 计算s=1+3+5+...+101 编写程序,输入正整数n,计算它的阶乘n!(n!=n×(n-1)×…×3×2×1).请大家用PASCAL语言,不要用c语言啊! pascal题目:【C语言训练】求s=a+aa+aaa+aaaa+aa...a的值题目描述求s=a+aa+aaa+aaaa+aa...a的值,其中a是一个一位的整数.例如2+22+222+2222+22222(此时共有5个数相加)输入整数a和n(n个数相加,1 计算1—1000之间能同时被3和5整除的整数的和.pascal语言急! 2 AND ((3=3) OR (39) OR (95) AND (7>8) =pascal 语言! 求100以内的素数pascal语言 Pascal语言某自然数N(1 用pascal语言编程:输出n(n