Excel'de Taş Kağıt Makas

Dim Choice(1 To 3) As String
Dim YourChoice As String

Sub Rock()

    Range("C4").Value = "Rock"
    YourChoice = "Rock"
   
    PC_Choice
   
End Sub

Ensedeki Zımbırtı

 

Ensesindeki titreşimle uyandı sabah, kalkma vakti gelmişti. Yüzünü yıkadıktan sonra kahvaltısını yapmaya başladı. Yapay meyve suyunu yudumlarken gözü yerdeki elbiseye takıldı. Dün gece barda tanıştığı hatunun elbisesi. Hala uyuyor olmalıydı. Acaba bu ilişkisi ne kadar sürecekti?

Engelden kaçan robot

Arduino Kod:

#include <Servo.h>
#include <NewPing.h>

Servo myservo;

int ENABLE_A = 11;
int pin_a1 = 9;
int pin_a2 = 8;

int ENABLE_B = 5;
int pin_b1 = 6;
int pin_b2 = 7;

int SENSOR_DISTANCE;
int LEFT_SENSOR_DISTANCE;
int RIGHT_SENSOR_DISTANCE;
int LFT_SNZ_DIS;
int RGT_SNZ_DIS;
int rastgele;

Çocuklar için kodlama uygulamaları

Aileler genellikle çocuklarının tabletle çok fazla oynamalarından şikayetçidir. Çocukların bu ilgisini fırsata çevirip tabletle daha kaliteli zaman geçirmelerini sağlayabiliriz. Aşağıda Google Play Store'daki en iyi kodlama uygulamalarını kolaydan zora doğru sıralamaya çalıştım. Kabaca; ilk 2 uygulama ilkokular, son 2 uygulama ortaokullar için uygun gözükse de öğrencinin seviyesine göre değişkenlik gösterebilir.

Coding Games For Kids - Learn To Code With Play

SpriteBox : Code Hour

Lightbot : Code Hour

Coddy: World on Algorithm Free

Excel'de dijital saat kodlama

Sub Draw()

Dim TimeString As String
Dim WhichOrder(9) As Byte
WhichOrder(1) = 1: WhichOrder(2) = 10: WhichOrder(3) = 18: WhichOrder(4) = 20: WhichOrder(5) = 29: WhichOrder(6) = 37: WhichOrder(7) = 39: WhichOrder(8) = 48

Do
    TimeString = Time
   
    For n = 1 To 8
   
        If (n <> 3 And n <> 6) Then
            DrawNumber CByte(Mid(TimeString, n, 1)), WhichOrder(n)
        Else
            DrawPoint WhichOrder(n)
        End If
   
    Next n
    Range("A18").Select
    Application.Wait (Now + TimeValue("0:00:01"))
    seconds = seconds + 1
Loop Until (seconds = 60)
   
End Sub

Çizgi izleyen robot

Arduino Kod:

int ENABLE_A = 11;
int pin_a1 = 9;
int pin_a2 = 8;

int ENABLE_B = 5;
int pin_b1 = 6;
int pin_b2 = 7;

int Sol = A0;
int Orta = A1;
int Sag = A2;

int SolDeger;
int OrtaDeger;
int SagDeger;
int eDeger=750;
int SonDonus=0;

void setup() {

  //Serial.begin(9600);
  //pin mode for the DC motors
  pinMode (ENABLE_A, OUTPUT);
  pinMode (pin_a1, OUTPUT);
  pinMode (pin_a2, OUTPUT);

  pinMode (ENABLE_B, OUTPUT);
  pinMode (pin_b1, OUTPUT);
  pinMode (pin_b2, OUTPUT);

}

Veliler

TV ya da akıllı telefonu bırakıp çocuklarıyla ilgilenmeyen velilerin, çocuklarının bilgisayar bağımlısı olmalarından sızlanmalarını anlayamamak.

Hayatında 2 kitap okumamış velilerin, çocuklarının kitap okumamasından şikayetçi olmalarını anlayamamak.

Öğrenciyken 3-5 soru yapamayan velilerin, çocuklarının 100 soru üzerinden yaptıkları 3-5 yanlışın hesabını sormalarını anlayamamak.

Çocuklarının derse olan ilgisizliğini ve çalışmayışını öğretmenin iyi ders anlatamayışına bağlayan velileri anlayamamak.

Evde 2 çocuğuyla baş edemeyen velilerin, bir sınıfta 30 öğrenciyle baş etmeye calışan öğretmenleri beğenmeyişlerini anlayamamak.

Kendisini işinde usta sanan öğretmen velilerin, çocuklarının öğretmenlerini (meslektaşlarını) kıyasıya eleştirmelerini anlayamamak.

Kısacası öğretmene işini öğretmeye çalışan, kimi zaman hesap soran kimi zaman ayar veren, her biri aslında birer başöğretmen olan velileri anlayamamak.