明解Ｃ言語 入門編 > 4. プログラムの流れの繰り返し > 読み込んだ整数値を逆順に表示 (do文) Delphi program Project1;{$APPTYPE CONSOLE}uses SysUtils; var no, dig: Integer; begin repeat write('正の整数を入力してください：'); read(no); if (no < 0…