1樓：颱風來襲
一般為了美觀，根據輸出結果的長度，用輸出寬度限制就好。
假如結果x為123，456，789的話，我們可以設定為write(x:4),那麼寬度就為4，即結果為：「 123 456 789」，因為x只有3位，而我們設定的是4位，根據輸出位數的不同，寬度設定也不同，你可以試試 ,像我今天做的，就要用這種方法
2樓：匿名使用者
假設要輸出x和y， write（x,' ',y）輸出的結果為：x y (x與y之間有一個空格，要想多個空格的話，在引號中間多空格就行了)
3樓：魍幽之帝
有兩種方法：第一種是先輸出第一個資料，接著每個資料前先輸一個空格；第二種先輸n-1個資料，每個資料後**空格，再輸最後一個資料。
例：輸出一個陣列裡的資料
var a:array[1..100] of integer;
i:integer;
begin
for i:=1 to 100 do read(a[i]);
write(a[i]);
for i:=2 to 100 do write(' ',a[i]);
writeln;
end.
var a:array[1..100] of integer;
i:integer;
begin
for i:=1 to 100 do read(a[i]);
for i:=2 to 100-1 do write(a[i],' ');
writeln(a[100];
end.
4樓：
write(a1,' ',a2);
- -||
怎麼在free pascal中用空格隔開最終結果
5樓：武風
最簡單的做法，for i:=1 to n do writeln(a[i],' ',b[i]);
這句話的效果是，輸出n行，每行的兩個數字分別屬於陣列a和陣列b，且中間有一個空格隔開
6樓：匿名使用者
在兩個輸出結果之間插入輸出空格即可 ！
7樓：
write(a,' ',b,' ',c);謝謝
pascal 語言:輸入一個英文句子，以『.'結束，單詞間用空格隔開。
8樓：匿名使用者
前面寫錯了，不好意思
9樓：匿名使用者
var st,dc:string;
p,s,d,k:longint;
begin
readln(st);
readln(dc);
p:=pos(dc,st);
while p>0 do
begin
s:=s+1;
delete(st,1,p+length(dc));
p:=pos(dc,st);
end;
if s=0 then
begin
for k:=1 to length(st) doif (ord(st[k])>=65)and(ord(st[k])<=90)or(ord(st[k])>=97)and(ord(st[k])<=122) then d:=d+1;
writeln(d);
endelse writeln(s);
end.
希望能幫助你哦！
10樓：匿名使用者
vara,b,c,i,j,k:integer;
st,jl,s:ansistring;
begin
a:=0;
readln(st);
st:=st+' ';
for i:=1 to length(st) dobegin
if st[i]=' '
then
begin
if a>0
then begin
str(a,jl);
s:=s+jl+',';
a:=-1;
endelse dec(a);
end;
inc(a);
end;
delete(s,length(s),1);
write(s);
end.
pascal 程式 讀入一個句子，單詞之間用空格隔開 輸出最長的單詞，並輸出這個單詞的長度
11樓：匿名使用者
vars:string;
i,j,m1,m2:integer;
begin
readln(s);
m2:=0;
m1:=0;
for i:=1 to length(s) dobegin
if s[i]=' ' then
begin
for j:=i to length(s) doif s[j]=' ' then
begin
if (j-i)>(m2-m1) thenbegin
m1:=i;
m2:=j;
end;
end;
end;
end;
for i:=m1+1 to m2-1 dowrite(s[i]);
write(' ',m2-m1-1);
end.
12樓：匿名使用者
var st:string;
i,j,k,x,y,z,ans:integer;
begin
readln(st);
x:=length(s);
for i:=1 to x do beginif st[i]<>' ' then inc(y) else beign
if st>ans then ans:=y;
y:=0;
end;
end;
writeln(ans);
end.
13樓：豆藝
vars:string;
i,s,ans:integer;
begin
readln(s);
ans:=0;
s:=0;
for i:=1 to length(s) dobegin
if s[i]<>' ' then inc(s)else beign
if s>ans then ans:=s;
s:=0;
end;
end;
writeln(ans);
end.
pascal 語言輸入一個正整數,求出它的所有素因子,每兩個數之間用一個空格隔開
pascal中行末空格怎麼不輸出
14樓：
如:for i:=1 to 100 do
if i<>100 then
write(i,' ')
else
write(i);
c#程式設計:輸入一個字串，各個單詞以空格分隔，然後按照pascal命名法輸出
15樓：蘿蔔天使
static void main(string args)
console.writeline(outstr);}
16樓：
新增microsfot.visualbasic的引用
17樓：匿名使用者
......sendkeys(left);
pascal中 write('':n) 表示輸出n個空格 c語言怎麼實現？
18樓：
可以用printf(" 這裡面打空格");
又或者for(i=1;i<=次數;i++) printf("一個空格")
怎樣讓matlab輸出的結果不用分數表示，而是用小數表示
模就用abs函式。如z 2 i abs z 分數輸出 format rat 2.1 3 輸出為7 10 百分數要自己處理。比如先乘100，再加一個百分號x 2.1 3 disp num2str x 100 小數多少位的話 vpa 2 3,3 matlab新手，怎麼樣可以讓matlab 輸出的結果不用...
java如何把迴圈遍歷結果輸出到文字
首先，啊，我的眼睛！請學會截圖，你的這三張圖我一張都看不清！然後我想了一下你的目的，你現在有一個學生資訊陣列，你是要把他們寫到一個檔案裡是吧，這個過程叫做資料序列化或者持久化 其實檔案中儲存成json串或xml的形式更容易閱讀資料和反序列化 因為看不清你的程式，所以我舉了個例子給你看下，給你些思路。...
如何讓nastran輸出的output2檔案包含模型資訊
相對於nastran中各物理量無指定單位 只需要各物理量的單位統一 adams中物理量內單位需要人為指定，在nastran中生成容adams的mnf檔案時，存在單位如何轉換的問題。通過nastran中的wtmass和dti units關鍵字的設定實現mnf檔案單位統一。程式設計軟體,程式設計開發軟體...