While Döngüsü

Coddy'nin R Journey'sinin Temeller bölümünün bir parçası — ders 39 / 78.

Bir for döngüsü önceden tanımlanmış bir dizi boyunca yinelenirken, bir while döngüsü bir koşul TRUE kaldığı sürece çalışmaya devam eder. Bu, bir şeyi kaç kez tekrarlamanız gerektiğini önceden bilmediğiniz durumlarda yararlıdır.

count <- 1
while (count <= 3) {
  print(count)
  count <- count + 1
}

Çıktı:

[1] 1
[1] 2
[1] 3

Döngü, her yinelemeden önce count <= 3 koşulunu kontrol eder. count 4 olduğunda, koşul FALSE olur ve döngü durur.

Önemli: Döngü içindeki değişkeni güncellemelisiniz. count <- count + 1 olmadan, koşul her zaman TRUE olur ve hiç bitmeyen sonsuz bir döngü oluşturur.

total <- 0
num <- 1
while (num <= 5) {
  total <- total + num
  num <- num + 1
}
print(total)

Çıktı:

[1] 15

Bu örnek, 1'den 5'e kadar olan sayıları toplayarak 15 sonucunu elde eder. while döngüsü, durma noktası sabit bir diziden ziyade bir koşula bağlı olduğunda idealdir.

Görev

Kolay

Girdiden bir n sayısı okuyun. 1'den n'e kadar olan tüm sayıların toplamını hesaplamak ve yazdırmak için bir while döngüsü kullanın.

Genel toplamı takip etmek için bir değişkenle ve sayaç olarak başka bir değişkenle başlayın. Sayacınız n değerinden küçük veya ona eşit olduğu sürece, her yinelemede sayacı artırarak toplama eklemeye devam edin.

Döngü tamamlandıktan sonra, print() kullanarak nihai toplamı yazdırın.

Örneğin, girdi 5 ise, çıktı şu şekilde olmalıdır:

[1] 15

Bunun nedeni 1 + 2 + 3 + 4 + 5 = 15 olmasıdır.

Kopya kağıdı

Bir while döngüsü, bir koşul TRUE kaldığı sürece çalışır:

count <- 1
while (count <= 3) {
  print(count)
  count <- count + 1
}

Döngü, her yinelemeden önce koşulu kontrol eder. Koşul FALSE olduğunda döngü durur.

Önemli: Sonsuz döngülerden kaçınmak için döngü içindeki değişkeni her zaman güncelleyin:

total <- 0
num <- 1
while (num <= 5) {
  total <- total + num
  num <- num + 1
}
print(total)  # Çıktı: [1] 15

While döngüleri, durma noktası sabit bir diziden ziyade bir koşula bağlı olduğunda idealdir.

Kendin dene

# Girdiyi oku
con <- file("stdin", "r")
n <- as.integer(suppressWarnings(readLines(con, n = 1)))

# Değişkenleri başlat
total <- 0
counter <- 1

# TODO: 1'den n'e kadar olan toplamı hesaplamak için while döngünüzü aşağıya yazın


# Sonucu yazdır
print(total)