R Program to find modulus of two numbers
Program
a <- readline(prompt = "Enter first number:")
a <- as.integer(a)
b <- readline(prompt = "Enter second number:")
b <- as.integer(b)
div = a / b
print(paste("Division of two numbers is: ", div))
Output 1
> a <- readline(prompt = "Enter first number:")
Enter first number:181
> a <- as.integer(a)
> b <- readline(prompt = "Enter second number:")
Enter second number:3
> b <- as.integer(b)
> div = a / b
> print(paste("Division of two numbers is: ", div))
[1] "Division of two numbers is: 60.3333333333333"
Output 2
> a <- readline(prompt = "Enter first number:")
Enter first number:12
> a <- as.integer(a)
> b <- readline(prompt = "Enter second number:")
Enter second number:0
> b <- as.integer(b)
> div = a / b
> print(paste("Division of two numbers is: ", div))
[1] "Division of two numbers is: Inf"