お題:世界のナベアツを作れ

プログラミングで解決してね 1~10の連続する数を順番に選択していき 素数の時だけ”アホになる‼️” とメッセージをだせ👍
16
ペンギン屋@技術とVBA好き。 @penguincomcom

@sakutan2020 @KotorinChunChun 何を重点に置くかでコードの書き方がかわるのがこの問題の面白いとこかと思っていますw 記事おもしろかったです! ありがとうございます✨✨✨

2020-02-08 07:06:55
ペンギン屋@技術とVBA好き。 @penguincomcom

@sakutan2020 @teori_kimono 小数判定w いいですね😁😁😁 ”かけ算で明示しつつ”も面白いです😆😆😆 さすがです👍

2020-02-08 07:13:38
ペンギン屋@技術とVBA好き。 @penguincomcom

修正バージョン twitter.com/akashi_keirin/…

2020-02-08 07:29:23
チン☆テクラ(bot) @akashi_keirin

しもた。修正。 Dim i As Long For i = 1 To 10 If isPrimeNumber( i ) Then Debug.Print "アホになる!!" Else Debug.Print CStr( i ) End If Next ですな。

2020-02-07 21:25:44
VBA模索中 @TJAHol9XCmIT9nu

@penguincomcom 昔作成した、「ある数のn番目の約数を求める関数」を流用して挑戦。 pic.twitter.com/2h8EiMTV8g

2020-02-08 07:55:30
拡大
xb @xbtomoki

@penguincomcom Dim x as Boolean For i=2 to 10 x=false For j=2 to int(√i) If i mod j=0 then x=true Next j If x=false then Msgbox アホ Next i int(i)がi=2,3のときにバグるけどそこの処理は割愛

2020-02-08 08:52:43
FukuCyndi papa @FukucyndiP

ひねりも何もないので、せめてネコ判定してもらった twitter.com/penguincomcom/… pic.twitter.com/IDo12QTjQe

2020-02-08 12:02:05
ペンギン屋@技術とVBA好き。 @penguincomcom

【よかったら遊んでください】✨🐧 プログラミングで解決してね❤️ お題:世界のナベアツを作れ / 1~10の連続する数を順番に選択していき 素数の時だけ ”アホになる‼️” とメッセージをだせ👍 \ #今日の積み上げ にいかが❓❓ まだまだ投稿募集中 トゥギャる予定です #VBA #プログラミング初心者

2020-02-08 09:12:09
拡大
ちゅん🐤 @KotorinChunChun

皆さんお待ちかね(待ってない)のワークシート関数を駆使したVBAです。 今回ばかりはワンライナーで済ませる方法が浮かばなかったので断念 twitter.com/penguincomcom/… pic.twitter.com/QT8LXudyya

2020-02-08 14:26:18
拡大
空腹おやじ @Z1000R_LR

@penguincomcom みんな同じだと、つまらないじゃないですか! 効率は無視してでも、人と違うことをwww pic.twitter.com/NedcDCn0K8

2020-02-08 21:29:35
拡大
拡大
拡大