• ベストアンサー

学校のマックで、「ターミナル」と「emacs」を使ってpascalのプ

学校のマックで、「ターミナル」と「emacs」を使ってpascalのプログラミングを学習しています。近々テストがあるので、自宅のWINDOWSでも練習したいと思っているのですが、どうすれば近い環境がつくれますでしょうか。 writelnやreadln、ほかにif 、elseなどの基本的なことができればよいです。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

下のリンクの辺りを見てください。

参考URL：
http://www.youtube.com/user/whsmath
inu999
質問者

お礼

ありがとうございます。 emacsのwindows版はダウンロードできたのですが、ターミナルに代わるものはどんなものがありますか。

inu999
質問者

補足

teratermというものを発見したのですが、HDD中を見るにはどうすらばよいでしょうか。たとえば、lsコマンドで、選んでいるディレクトリの中にあるファイル一覧がteratermに表示されるようにしたいです。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • 今学校で、マックを使いpascalの勉強をしています。

    今学校で、マックを使いpascalの勉強をしています。 家でも練習したいのですが、ターミナルの代わりに使えるソフトはありませんか？ そのようなソフトがあれば、どうやって自分のHDDのディレクトリを参照できるようになるかも教えていただきたいです。

  • Pascalについて

    Pascalというプログラミング言語を習い始めました。 自宅でも練習してみたいのですが、無償で安全にダウンロードできるソフトはあるのでしょうか。

  • Pascalが全く分かりません！

    今私は学校でPascalを勉強していて、近々テストもあるのですが、プログラムの書き方が全くと言っていいほど分かっていません。このままだと単位を落としそうなぐらいヤバイです！ 今の状況は頑張ってbeginまでいけるかどうかと言う所です。すみません、あまりの理解のなさにこの質問の文章までおかしくなっているかも知れません。こんな私でも分かるな超初心者向けのPascalの本ってありますか？また、短期間で覚えられるコツなどはないでしょうか？ ちなみに今学校で使用している教科書は東京大学出版会から出ている「Pascalプログラミング　TURBO Pascalによる基礎と応用」の第２版です。 先にも記したとおり近々テストとの事で焦っています。回答にご協力の程よろしくお願い致します。

  • Pascal 　insertの使い方

    プログラミングの授業で 整数(integer)を入力して、金額表示のように３桁ごとにコンマを打って文字列（string)として表示せよ。 という問題が出されました。 やってみた結果が下なんですが、insertがまちがってぃて実行されません。どこが間違ってるか教えてもらえませんか。 program prj7_2(input,output); var st,u,con:string[100]; n,i,x:integer; begin writeln('数を入力してください。'); readln(st); n:=length(st); if n<=3 then writeln(st) else begin i:=1; con:=','; repeat x:=n-3*i; u:=insert(con,st,x); until x:<3; writeln(u); end; end.

  • Pascal gpcのコンパイル、実行について。

    プログラミング初心者で、Pascalのコンパイル、実行で困っています。 Mac Os Xでコンパイルと実行の仕方がわかりません。 ほんと初歩的な質問で申し訳ございません。 Program Lesson1_Program1; begin Write('Hello World. Prepare to learn PASCAL!!'); Readln; End. このような内容のサンプルコードで、ファイル名は lesson1_program1.pas です。 ターミナルから $gpc lesson1_program1.pas と打っても ld: library not found for -lSystemStubs collect2: ld returned 1 exit status のようなエラーメッセージがかえってきます。 一応ファイルの拡張子を .p　 にしても同じでした。 他のコードも少し書いてコンパイルしてみましたがだめでした。 古い言語なので、あまりweb検索をかけてもひっかかりません。 Pascal、GNU Pascal Compiler については全然わかりません。 わかるかたいらっしゃいましたらどうぞ、よろしくお願いいたします。

  • 検索がうまくいきません(pascal)

    名前と電話番号を外部環境'teldata'に出力し、検索したい人の名前を入力し対応する電話番号を答えるプログラムを作りました(登録されてなければ「該当者なし」と出力、'end'が入力されるまで続く)。 コンパイルは通ったのですが検索結果はおかしなものになってしまいました。 どこが間違っているのか、ご教授ください。 ソース) program kadai(input,output,meibo); type KojinData = record name : packed array[1..20] of char; tel : packed array[1..15] of char end; var meibo : file of KojinData; x : KojinData; begin rewrite( meibo,'teldata' ); write('名前:'); readln(x.name); repeat write('電話番号:'); readln( x.tel ); write( meibo,x); write('名前:'); readln( x.name ) until (x.name='end'); reset( meibo,'teldata' ); write('名前:'); readln(x.name); repeat while not eof( meibo ) do begin read( meibo,x ) end; if x.name = x.name then begin writeln('電話番号:',x.tel) end else begin writeln('該当者なし') end until (x.name='end') end. 結果) 名前:a 電話番号:1 名前:b 電話番号:2 名前:c 電話番号:3 名前:end 名前:a 電話番号:3 電話番号:3 電話番号:3 電話番号:3 {強制終了するまで続く}

  • ターミナルを学習したい→お勧めHP教えて！

    os:10.3.1 機種：PB"12 1G 主な使用：DTP業務、Office、ブラウズ、メール等等 つかみどころのない質問ですいません。 せっかくバンドルされているターミナル。私のような人には特に使う必然性がないっぽいのですが、せっかくなので使い方を覚えていきたく思います。ついては超初心者にも解る「ターミナルってこんな事ができるよー」等の基本的な事から学習していけるHPがあれば教えてください。emacs(ちょと聞いただけ)とか、newsリーダーみたいな使い方も出来るようなので。 お願いします。

    • ベストアンサー
    • Mac
  • ,プログラミングでの文章の書き換え

    以下の文章をrepeat文ではなくwhile文で書くとどうなりますか？ program Problem6_3; {数当てゲーム} var Kotae, Suisoku, Kaisu, : intenger; begin Writeln('数当てげーむをします.'); Writeln('二桁以下の整数を入力してください.'); Randaomize; kotae := Random(100); repeat Kaisu : = kaisu + 1; Write('? '); Readln(Suisoku); if Kotae > Suisoku then Writeln('もっと大きい数です.') else if Kotae < Suisoku then Writeln('もっと小さいかずです.') else Write('正解です.') until Suisoku = Kotae; Writeln(Kaisu, ' 回で当たりました.');

  • 一月前の日付を求めるプログラム(pascal）

    大学の課題で「一月前の日付を求めるプログラムを作れ。その日が無ければその月の最後の日を示す。」というのが出題されました。12月18日(火)と入力すると11月18日(日)、12月31日(月)なら11月30日(金)となる具合です。 列挙型を用い書いてみたのですが、コンパイルしたら「Type-clash」と出てコンパイルできませんでした。どう改善すべきかアドバイスお願いします。 program calender(input,output); type months=(Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Nov,Oct,Dec); weeks=(Mon,Tue,Wed,Thu,Fri,Sat,Sun); var x,x1,z,z1:char; y,y1,p1,p2,i,r:integer; begin writeln('月：'); readln(x); writeln('日:'); readln(y); writeln('曜日:'); readln(z); if x=Jan then begin x1:=Dec end else begin x1:=pred(x)　　　　　　　　　　　　｛x1＝表示する月｝ end; if y>=29 then if x=Mar then begin y1:=28 end else begin y1:=y　　　　　　　　　　　　　｛y1＝表示する日｝ end; case x of May,Jul,Aug,Nov,Dec : p1:=30; Jan,Feb,Apr,Jun,Sep,Oct : p1:=31; Mar : p1:=28 {月の違いによる日数の違い｝ end; p2:=y-y1;　　　　　｛日にちの違い｝ r:=(p1+p2)-trunc((p1+p2)/7)*7;　｛7で割った余り｝ for i := 1 to r do z1:=pred(z);　　　　　　　　　　｛z1＝表示する曜日｝ writeln(x1,'月',y1,'日',z1,'曜日') end.

  • ２つの年月日の間の日数を求めるプログラム(PASCAL)

    　大学の講義で、「２つの年月日を入力し、その年月日の間の日数を求めるプログラムを作成しなさい」という宿題が出たので、下のようにプログラムを作成したところ、…63(最後の行):parse error before '.'というエラーが出たのですが、なぜそのようなエラーが出るのかがわかりません。どう改善すべきか、アドバイスをお願いします。 program ex13(input,output); var year1,year2:1..9999; month1,month2:1..12; y1,y2:1..9999; m1,m2:1..12; d1,d2:1..31; n1,n2:1..9999999; begin writeln('question 13'); writeln('Please key the old date.'); write('Y: '); read(y1); write(' M: '); read(m1); write(' D: '); readln(d1); writeln('Please key the new date.'); write('Y: '); read(y2); write(' M: '); read(m2); write(' D: '); readln(d2); for year1:= 1 to y1 do begin if ((year1 mod 4 = 0) and not (year1 mod 100 = 0)) or (year1 mod 400 = 0) then n1:=n1+366 else n1:=n1+365 end; for month1:= 1 to m1 do begin case month1 of 3,5,7,8,10,12,1: n1:=n1+31; 4,6,9,11: n1:=n1+30; 2: if ((y1 mod 4 = 0) and not (y1 mod 100 = 0)) or (y1 mod 400 = 0) then n1:=n1+29 else n1:=n1+28 end; n1:=n1+d1; for year2:= 1 to y2 do begin if ((year2 mod 4 = 0) and not (year2 mod 100 = 0)) or (year2 mod 400 = 0) then n2:=n2+366 else n2:=n2+365 end; for month2:= 1 to m2 do begin case month2 of 3,5,7,8,10,12,1: n2:=n2+31; 4,6,9,11: n2:=n2+30; 2: if ((y2 mod 4 = 0) and not (y2 mod 100 = 0)) or (y2 mod 400 = 0) then n2:=n2+29 else n2:=n2+28 end; n2:=n2+d2; writeln('Ans.',n2-n1); end.

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する