プロフェッショナルがハッカー度を計ってくれるスレ (777ﾚｽ)
上下前次1-新
430: Delphi/Kylix版修正 [sage] 02/01/19 18:39 AAS
program ke;
{
k - K language Compiler
}
{$APPTYPE CONSOLE}
uses SysUtils, Math;
var
Daiichi, Daini: Double;
Beki: Double;
begin
Writeln('第一数字(半角数字で入力してください):');
Readln(Daiichi);
Writeln('第二数字(半角数字で入力してください):');
Readln(Daini);
Beki := Power(Daiichi, Daini);
Writeln;
Writeln(Format('足し算:%f + %f = %f', [Daiichi, Daini, Daiichi + Daini]));
Writeln(Format('足し算:%f - %f = %f', [Daiichi, Daini, Daiichi - Daini]));
Writeln(Format('足し算:%f * %f = %f', [Daiichi, Daini, Daiichi * Daini]));
Writeln(Format('べき乗:%f の %f = %f', [Daiichi, Daini, Beki]));
end.
431: 名無しさん＠お腹いっぱい。 [sage] 02/01/19 19:34 AAS
;; emacs lisp 版
(defun け ()
(interactive)
(let ((daiichi (read-minibuffer "第一数字(半角数字で入力して下さい)："))
(daini (read-minibuffer "第一数字(半角数字で入力して下さい)：")))
(insert "\n")
(insert (format "足し算：%f + %f = %f\n" daiichi daini (+ daiichi daini)))
(insert (format "引き算：%f - %f = %f\n" daiichi daini (- daiichi daini)))
(insert (format "掛け算：%f * %f = %f\n" daiichi daini (* daiichi daini)))
(insert (format "べき乗：%f の %f 乗 = %f\n" daiichi daini
(eval (cons '* (make-list daini daiichi)))))
0))
432: 名無しさん＠お腹いっぱい。 [sage] 02/01/19 20:20 AAS
HelloWorldスレになりそうな予感
433: 名無しさん＠お腹いっぱい。 [sage] 02/01/20 00:24 AAS
//すべてはけ言語に回帰しる！
#include <iostream.h>
#include <math.h>
#include <iomanip.h>
#define Toyotomi {
#define Hideyosi }
#define hack double
class KeGengo Toyotomi
hack daiichi, daini;
hack beki;
public:
virtual KeGengo()=0;
void cygwin() Toyotomi
cout <<"第一数字(半角数字で入力して下さい)：";
cin >>daiichi;
cout <<"第二数字(半角数字で入力して下さい)：";
cin >>daini;
beki = pow(daiichi, daini);
cout <<"\n";
cout <<"足し算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"+" <<daini <<"=" <<daiichi + daini <<endl;
cout <<"引き算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"-" <<daini <<"=" <<daiichi - daini <<endl;
cout <<"掛け算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"*" <<daini <<"=" <<daiichi * daini <<endl;
cout <<"べき乗："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"の" <<daini <<"乗 =" <<beki <<endl;
Hideyosi
Hideyosi;
434(1): 名無しさん＠お腹いっぱい。 [sage] 02/01/20 02:35 AAS
このスレみてて低レ研を思い出した
435: 名無しさん＠お腹いっぱい。 [] 02/01/20 02:42 AAS
>434
なつかしいじゃねえかおい。
436: 名無しさん＠お腹いっぱい。 [] 02/01/20 12:54 AAS
こんな感じか？
外部ﾘﾝｸ:www.kobuta.com
437: I is a hacker [sage] 02/01/20 13:34 AAS
「近代プログラマの夕べ」でマーフィーの法則を取り上げてブームの火付け役になった人だよね？
438(1): 名無しさん＠お腹いっぱい。 [sage] 02/01/20 14:41 AAS
ﾊｯｶｰになるために今日もｴﾛｹﾞｰやってます
439: For C++改訂版 [sage] 02/01/20 16:54 AAS
あ、間違ってた・・・鬱氏
#include <iostream.h>
#include <math.h>
#include <iomanip.h>
#define Toyotomi {
#define Hideyosi }
#define hack double
class KeGengo Toyotomi
hack daiichi, daini;
hack beki;
public:
KeGengo()Toyotomi
cout<<"ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!!!!"<<endl;
Hideyosi;
~KeGengo()Toyotomi
cout<<"（＾∀＾）ｹﾞﾗｹﾞﾗ ｼﾈﾔ"<<endl;
Hideyosi;
void cygwin() Toyotomi
cout <<"第一数字(半角数字で入力して下さい)：";
cin >>daiichi;
cout <<"第二数字(半角数字で入力して下さい)：";
cin >>daini;
beki = pow(daiichi, daini);
cout <<"\n";
cout <<"足し算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"+" <<daini <<"=" <<daiichi + daini <<endl;
cout <<"引き算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"-" <<daini <<"=" <<daiichi - daini <<endl;
cout <<"掛け算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"*" <<daini <<"=" <<daiichi * daini <<endl;
cout <<"べき乗："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"の" <<daini <<"乗 =" <<beki <<endl;
Hideyosi
Hideyosi;
440: Turbo Pascal版 [sage] 02/01/20 17:20 AAS
program KeGengo;
var
Daiichi, Daini: Double;
Beki: Double;
begin
Writeln('第一数字(半角数字で入力してください):');
Readln(Daiichi);
Writeln('第二数字(半角数字で入力してください):');
Readln(Daini);
Beki := Power(Daiichi, Daini);
Writeln;
Writeln(Format('足し算:%f + %f = %f', [Daiichi, Daini, Daiichi + Daini]));
Writeln(Format('足し算:%f - %f = %f', [Daiichi, Daini, Daiichi - Daini]));
Writeln(Format('足し算:%f * %f = %f', [Daiichi, Daini, Daiichi * Daini]));
Writeln(Format('べき乗:%f の %f = %f', [Daiichi, Daini, Beki]));
end.
441(1): BASIC版 [sage] 02/01/20 17:41 AAS
10 REM ｹｹﾞﾝｺﾞ
20 INPUT "ﾀﾞｲｲﾁｽｳｼﾞ（ﾊﾝｶｸｽｳｼﾞﾃﾞﾆｭｳﾘｮｸｼﾃｸﾀﾞｻｲ）";daiichi
30 INPUT "ﾀﾞｲﾆｽｳｼﾞ（ﾊﾝｶｸｽｳｼﾞﾃﾞﾆｭｳﾘｮｸｼﾃｸﾀﾞｻｲ）";daini
40 PRINT
50 PRINT "ﾀｼｻﾞﾝ=";daiichi+daini;
60 PRINT "ﾋｷｻﾞﾝ=";daiichi-daini;
70 PRINT "ｶｹｻﾞﾝ=";daiichi*daini;
80 PRINT "ﾍﾞｷｼﾞｮｳ=";daiichi^daini;
90 END
442: 名無しさん＠お腹いっぱい。 [] 02/01/20 17:44 AAS
おめーらの駄ソースなんて読みたくねーんだよ!
秀吉降臨願いage
443(1): 名無しさん＠お腹いっぱい。 [sage] 02/01/20 18:06 AAS
>>438
ﾊｯｶｰになるために今日もｴﾛｹﾞｰのセーブデータ解析やってます
だったらﾁｮｯﾄだけｶｺｲｲ
444(1): 名無しさん＠お腹いっぱい。 [] 02/01/20 18:57 AAS
そろそろ割り算対応きぼん。
445: 名無しさん＠お腹いっぱい。 [sage] 02/01/20 19:00 AAS
>>443
ｴﾛｹﾞｰのセブデタ解析とＣＧいじりの場合かなりの高確率でカニになれます
446(2): C++改訂版 [sage] 02/01/20 23:37 AAS
#include <iostream.h>
#include <math.h>
#include <iomanip.h>
#define Toyotomi {
#define Hideyosi }
#define hack double
class KeGengo Toyotomi
protected:
hack daiichi, daini;
hack beki;
public:
KeGengo()Toyotomi
cout<<"ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!!!!"<<endl;
Hideyosi;
~KeGengo()Toyotomi
cout<<"（ﾟ∀ﾟ)ｱﾋｬﾋｬ"<<endl;
Hideyosi;
virtual void cygwin() Toyotomi
cout <<"第一数字(半角数字で入力して下さい)：";
cin >>daiichi;
cout <<"第二数字(半角数字で入力して下さい)：";
cin >>daini;
beki = pow(daiichi, daini);
cout <<"\n";
cout <<"足し算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"+" <<daini <<"=" <<daiichi + daini <<endl;
cout <<"引き算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"-" <<daini <<"=" <<daiichi - daini <<endl;
cout <<"掛け算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"*" <<daini <<"=" <<daiichi * daini <<endl;
cout <<"べき乗："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"の" <<daini <<"乗 =" <<beki <<endl;
Hideyosi
Hideyosi;
447: 名無しさん＠お腹いっぱい。 [sage] 02/01/20 23:39 AAS
>>444ご要望にお答えして
原作の風味は失っていないと自負しています
だんだん調子が狂ってきて、普段もけ言語志向になりそう・・・
class Warizan : public KeGengo {
public:
void cygwin()Toyotomi
KeGengo::cygwin();
cout <<"割り算："<< setiosflags( ios::fixed )<<setprecision( 6 )<<daiichi <<"/" <<daini <<"=" <<daiichi / daini <<endl;
Hideyosi
Hideyosi;
448(1): 名無しさん＠お腹いっぱい。 [sage] 02/01/21 00:38 AAS
>>441をｷﾞｺBASICに移植
10 (ﾟ∀ﾟ) ｹｹﾞﾝｺﾞ
20 ｲﾚﾃﾐﾛ "ﾀﾞｲｲﾁｽｳｼﾞ（ﾊﾝｶｸｽｳｼﾞﾃﾞﾆｭｳﾘｮｸｼﾃｸﾀﾞｻｲ）";ﾀﾞｲｲﾁﾉｶｽﾞ
30 ｲﾚﾃﾐﾛ "ﾀﾞｲﾆｽｳｼﾞ（ﾊﾝｶｸｽｳｼﾞﾃﾞﾆｭｳﾘｮｸｼﾃｸﾀﾞｻｲ）";ﾀﾞｲﾆﾉｶｽﾞ
40 ﾎｻﾞｹ
50 ﾎｻﾞｹ "ﾀｼｻﾞﾝ=";ﾀﾞｲｲﾁﾉｶｽﾞ+ﾀﾞｲﾆﾉｶｽﾞ;
60 ﾎｻﾞｹ "ﾋｷｻﾞﾝ=";ﾀﾞｲｲﾁﾉｶｽﾞ-ﾀﾞｲﾆﾉｶｽﾞ;
70 ﾎｻﾞｹ "ｶｹｻﾞﾝ=";ﾀﾞｲｲﾁﾉｶｽﾞ*ﾀﾞｲﾆﾉｶｽﾞ;
80 ﾓｼﾓﾀﾞﾖ ﾀﾞｲﾆﾉｶｽﾞ = 0 ﾀﾞｯﾀﾗ ｲｯﾃﾖｼ 100
90 ﾎｻﾞｹ "ﾜﾘｻﾞﾝ=";ﾀﾞｲｲﾁﾉｶｽﾞ/ﾀﾞｲﾆﾉｶｽﾞ;
100 ﾎｻﾞｹ "ﾍﾞｷｼﾞｮｳ=";ﾀﾞｲｲﾁﾉｶｽﾞ^ﾀﾞｲﾆﾉｶｽﾞ;
110 ｼﾈ
449: 名無しさん＠お腹いっぱい。 [sage] 02/01/21 00:44 AAS
>>358358(7): 豊臣秀吉 ◆keB.0xwM [sage] 02/01/13 18:25 AAS
#include <stdio.h>
#include <math.h>
main()
{
double daiichi, daini;
double beki;
printf("第一数字(半角数字で入力して下さい)：");
scanf("%lf", &daiichi);
printf("第二数字(半角数字で入力して下さい)：");
scanf("%lf", &daini);
printf("\n");
printf("足し算：%lf + %lf = %lf\n", daiichi, daini, daiichi + daini);
printf("引き算：%lf - %lf = %lf\n", daiichi, daini, daiichi - daini);
printf("掛け算：%lf * %lf = %lf\n", daiichi, daini, daiichi * daini);
printf("べき乗：%lf の %lf 乗 = %lf\n", daiichi, daini, beki = pow(daiichi, daini));
return 0;
}
の
オリジナルを忠実に移植して下さい。
へたな改良は価値がありません。
450(1): 名無しさん＠お腹いっぱい。 [sage] 02/01/21 01:07 AAS
センスないのばっかですっかり駄スレ、残念。
451: 名無しさん＠お腹いっぱい。 [] 02/01/21 01:34 AAS
>>450
文句があるならｽｰﾊﾟｰﾊｶｰにいえ！
ということで、ｽｰﾊﾟｰﾊｶｰ御光臨祈願age!
迷える子羊達に一条の光を
452(1): I is a hacker [sage] 02/01/21 07:48 AAS
秀吉は多分、
今必死でifで条件分岐するのを研究中なんだＹＯ！
このスレの住人みたいにタコなユーザが0で除算をするように入力した場合に
うまく入力を拒否してくれる、ああ、秀吉様は何という親切なユーザインターフェースを
考えてくださっているのだろうか！！！
453: 名無しさん＠お腹いっぱい。 [sage] 02/01/21 11:58 AAS
>>452
それは違うだろう
け言語は高度に完成された言語だ
あれは、ユーザーフレンドリーな設計なのだ
そう、友情とはお互いが信頼しあって初めて生まれるもの・・・
はなから人を疑ってかかるプログラマに真の友情は芽生えない
け言語は一般社会に対するアンチテーゼでもあるのだ！
454: 名無しさん＠お腹いっぱい。 [sage] 02/01/21 12:09 AAS
だいぶおちついてきちゃったね(笑)
上下前次1-新書関写板覧索設栞歴
あと 323 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.020s