print(paste("올해는",2016,"년 입니다"))
print(paste("올해는",2017,"년 입니다"))
print(paste("올해는",2018,"년 입니다"))
print(paste("올해는",2019,"년 입니다"))
for(year in c(2016:2019)){
print(paste("올해는",year,"년 입니다"))
}
## 1 ~ 10 까지
## print("숫자 1 는 정수 입니다")
for(num in c(1:10)){
print(paste("숫자",num,"는 정수 입니다"))
}
# 1 ~ 10 까지
# print("숫자 1 는 홀수 입니다")
# print("숫자 2 는 짝수 입니다")
for (x in 1:10) {
if(x %% 2 == 1){
print(paste("숫자", x,"는 홀수 입니다"))
}else{
print(paste("숫자", x,"는 짝수 입니다"))
}
}
# 1부터 10까지를 출력하시오?
for (x in 1:10) {
print(paste(x,"+"))
}
# 1부터 10까지를 합을 구하시오?
s <- 0
for (x in 1:10) {
s <- s+x
print(s)
}
print(s)
# 문제 1 부터 100까지의 짝수의 합과 홀수의 합을 출력하시오?
a <- 0 # 홀수의 합
b <- 0 # 짝수의 합
for (x in 1:100) {
if(x %% 2 == 1){
a <- a+x
}else{
b <- b+x
}
}
print(paste("홀수의 합:",a))
print(paste("짝수의 합:",b))
LS0tDQp0aXRsZTogIkZvcmxvb3Ag7Jew7Iq1Ig0Kb3V0cHV0OiBodG1sX25vdGVib29rDQotLS0NCg0KDQpgYGB7cn0NCnByaW50KHBhc3RlKCLsmKztlbTripQiLDIwMTYsIuuFhCDsnoXri4jri6QiKSkNCnByaW50KHBhc3RlKCLsmKztlbTripQiLDIwMTcsIuuFhCDsnoXri4jri6QiKSkNCnByaW50KHBhc3RlKCLsmKztlbTripQiLDIwMTgsIuuFhCDsnoXri4jri6QiKSkNCnByaW50KHBhc3RlKCLsmKztlbTripQiLDIwMTksIuuFhCDsnoXri4jri6QiKSkNCg0KZm9yKHllYXIgaW4gYygyMDE2OjIwMTkpKXsNCiAgcHJpbnQocGFzdGUoIuyYrO2VtOuKlCIseWVhciwi64WEIOyeheuLiOuLpCIpKQ0KfQ0KDQpgYGANCg0KYGBge3J9DQojIyAxIH4gMTAg6rmM7KeADQojIyBwcmludCgi7Iir7J6QIDEg64qUIOygleyImCDsnoXri4jri6QiKQ0KDQpmb3IobnVtIGluIGMoMToxMCkpew0KICBwcmludChwYXN0ZSgi7Iir7J6QIixudW0sIuuKlCDsoJXsiJgg7J6F64uI64ukIikpDQp9DQoNCg0KIyAxIH4gMTAg6rmM7KeADQojIHByaW50KCLsiKvsnpAgMSDripQg7ZmA7IiYIOyeheuLiOuLpCIpDQojIHByaW50KCLsiKvsnpAgMiDripQg7Ked7IiYIOyeheuLiOuLpCIpDQoNCmZvciAoeCBpbiAxOjEwKSB7DQogIGlmKHggJSUgMiA9PSAxKXsNCiAgICBwcmludChwYXN0ZSgi7Iir7J6QIiwgeCwi64qUIO2ZgOyImCDsnoXri4jri6QiKSkNCiAgfWVsc2V7DQogICAgcHJpbnQocGFzdGUoIuyIq+yekCIsIHgsIuuKlCDsp53siJgg7J6F64uI64ukIikpDQogIH0NCn0NCg0KIyAx67aA7YSwIDEw6rmM7KeA66W8IOy2nOugpe2VmOyLnOyYpD8NCmZvciAoeCBpbiAxOjEwKSB7DQogIHByaW50KHBhc3RlKHgsIisiKSkNCn0NCg0KIyAx67aA7YSwIDEw6rmM7KeA66W8IO2VqeydhCDqtaztlZjsi5zsmKQ/DQpzIDwtIDANCmZvciAoeCBpbiAxOjEwKSB7DQogIHMgPC0gcyt4DQogIHByaW50KHMpDQp9DQpwcmludChzKQ0KDQojIOusuOygnCAxIOu2gO2EsCAxMDDquYzsp4DsnZgg7Ked7IiY7J2YIO2VqeqzvCDtmYDsiJjsnZgg7ZWp7J2EIOy2nOugpe2VmOyLnOyYpD8NCmEgPC0gMCAjIO2ZgOyImOydmCDtlakNCmIgPC0gMCAjIOynneyImOydmCDtlakNCmZvciAoeCBpbiAxOjEwMCkgew0KICBpZih4ICUlIDIgPT0gMSl7DQogICAgYSA8LSBhK3gNCiAgfWVsc2V7DQogICAgYiA8LSBiK3gNCiAgfQ0KfQ0KcHJpbnQocGFzdGUoIu2ZgOyImOydmCDtlak6IixhKSkNCnByaW50KHBhc3RlKCLsp53siJjsnZgg7ZWpOiIsYikpDQoNCmBgYA0KDQo=