# Step 1: Create a vector of numbers from 1 to 10
numbers <- 1:10
# Step 2: Print the vector
print("Original Vector:")
print(numbers)
# Step 3: Calculate the square of each number in the vector
squared_numbers <- numbers^2
# Step 4: Print the squared numbers
print("Squared Numbers:")
print(squared_numbers)
# Step 5: Calculate the sum of the squared numbers
sum_squared <- sum(squared_numbers)
# Step 6: Print the sum of squared numbers
print("Sum of Squared Numbers:")
print(sum_squared)
# Step 7: Check if the sum is greater than 50
if (sum_squared > 50) {
print("The sum of squared numbers is greater than 50.")
} else {
print("The sum of squared numbers is not greater than 50.")
}
# Step 8: End the program