R Programming
, 1
Experiment - 01
Q1. Write a program to check whether a yr. entered by the user is a leap year or
not?
Ans:
Input:
# leap year or not
year = as.integer(readline(prompt="Enter a year: "))
if((year %% 4) == 0) {
if((year %% 100) == 0) {
if((year %% 400) == 0) {
print(paste(year,"is a leap year"))
} else {
print(paste(year,"is not a leap year"))
}
} else {
print(paste(year,"is a leap year"))
}
} else {
print(paste(year,"is not a leap year"))
}
Output:
Enter a year: 2070
[1] "2070 is not a leap year"
Enter a year: 3036
[1] "3036 is a leap year"
, 2
Experiment - 02
Q2. WAP to find the sum of natural no. Without formula using if-else
statement and the while loop.
Ans:
Input:
# take input from the user
num = as.integer(readline(prompt = "Enter a number: "))
if(num < 0) {
print("Enter a positive number")
} else {
sum = 0
# use while loop to iterate until zero
while(num > 0) {
sum = sum + num
num = num - 1
}
print(paste("The sum is", sum))
}
Output:
Enter a number: 20
[1] "The sum is 210"
Enter a number: 10
[1] "The sum is 55"
Enter a number: 60
[1] "The sum is 1830"