pascal中在不知道輸入數數位時怎樣程式設計能使輸出數是倒序輸出的

2022-11-10 15:40:21 字數 951 閱讀 9050

1樓:飄渺世間天

program test;

procedure reverseprint();

vara: char;

begin

read(a);

if a <> '#' then

begin

reverseprint();

write(a);

end else

begin

readln;

end;

end;

begin

reverseprint();

readln;

end.

2樓:

program ch1;

var s,sub:string;

k:integer;

begin read(s);

for k:=2 to length(s) dobegin sub:=copy(s,k,1);

delete(s,k,1);

insert(sub,s,1);

end;

write(s);

end.

3樓:

var i:integer;

st:string;

begin

readln(st);

for i:=length(st) downto 1 dowrite(st[i]);

end.

4樓:匿名使用者

j:=0;

while not eoln do

begin

inc(j);

read(q); //q是char格式的a[j]:=q;

end;

for i:=j downto 1 do

write(a[i]);

有一首歌歌詞是「不知道不知道 為什麼不知道在酒吧一直聽到的女的唱的歌名叫什麼?誰唱的

飛輪海和she合唱的 謝謝你的溫柔 歌名 為什麼不知道 韓語歌,翻唱的?經過一酒吧聽到一女生在唱一首歌 但不知道是什麼就聽到一歌詞 那只是答案當作習慣 有人知道麼或類似 當冬夜漸暖 演唱 孫燕姿 很多事情 不是誰說了就算 即使傷心 結果還是自己擔 多少次失望表回示著答多少次期盼 事實證明 幸福很難 ...

如果你不知道這個單詞的意思,你可以在字典中查 用英語翻譯

if you don t know the meaning of the word,you can look it up in the dictionary.vs天才翻譯家 if you don t the word s meaning,you can look it up in dictionar...

通知欄經常彈出選擇輸入法,不知道怎麼才能關閉

通知欄經常彈出bai選擇輸入法是設定錯du誤造成的,解zhi決方法為 dao 1 要關閉通知欄專快捷入口,就先 屬小手快速開啟輸入法了,如圖。2 小手快速開啟輸入法之後,我的 迅速小手觸下,如圖。3 我的 迅速小手觸下之後,設定 也隨之簡單觸開,如圖。4 設定 也隨之簡單觸開後,訊息通知 立馬拇指點...