#x <- -2
#   se x = -1 ou (x entre 0 e 10)
#if (x == -1 || (x>= 0 && x<=10)){
#  print(x)
#}else{
#  print(paste0("não foi o ",x))
#}
#input <- function(){
#  continue = T
#  while( continue ){
#    p <- as.numeric(readline())
#    if( p == -1 || ( 0 <= p && p <= 10 )){
#      continue <- F
#    } else{
#      print("valor invalido, digite um numero de 0-10 ou -1")
#    }
#  }
#}
#print(input())
i <- 2 
for(j in(1:9)){
  a = paste0(i, " x ", j, " = ", i*j)
  print(c(a,1,234,14,14,124), quote = FALSE)
}