Programming in lua STRING AND ARRAY

PROGRAMMING
IN
LUA
(FUNCTIONS WITH STRING AND
ARRAY)

INDEX
Program to accept the string and count number of vowels in it.
Program to accept the string and count number words whose first letter is vowel.
Program to accept the string and check it’s a palindrome or not
Program to accept the number from user and search it in an array of 10 numbers using linear search.
Program to accept the numbers in an array unsorted order and display it in selection sort.
Program to swap first element with last, second to second last and so on (reversing elements)
Program to create a function name swap2best() with array as a parameter and swap all the even
index value.
Program to print the left diagonal from a 2D array
Program to swap the first row of the array with the last row of the array
Program to print the lower half of the 2d array.

Program to accept the string and count number of vowels in it.
function vowelcount(sent)
k=string.len(sent)
x=1
count=0
while(x<=k)
do
ch=string.sub(sent,x,x)
if(ch=='a' or ch=='e' or ch=='i' or ch=='u' or ch=='o')
then
count=count+1
end
x=x+1
end
print("no of vowels are = "..count)
end
vowelcount("my first program of vowel")
------------------output---------------------------
no of vowels are = 6

Program to accept the string and count number words whose first letter is vowel.
function vowelcount(sent)
k=string.len(sent)
x=1
count=0
flag=1
while(x<=k)
do
if(flag==1)
then
then
count=count+1
flag=0
end
end
if(ch==' ')
then
x=x+1
then
count=count+1
end
end
x=x+1
end
print("no of vowels are = "..count)
end
vowelcount("its my irst program of vowel word in our")
-------------------output-------------------
no of vowels are = 5

Program to accept the string and check it’s a palindrome or not
function checkpal(nm)
k=string.len(nm)
for x=1,math.floor(string.len(nm)/2),1
do
if(string.sub(nm,x,x) == string.sub(nm,k,k))
then
flag=1
else
flag=-1
break
end
k=k-1
end
return flag
end
nm=io.read()
t=checkpal(nm)
if(t==1)
then
print("Its a pal")
else
print("Its not a pal")
end
--------------output----------------
madam
Its a pal

Program to accept the number from user and search it in an array of 10 numbers using linear search.
no={5,10,25,8,6,53,4,9,12,14}
x=1
pos=-1
print("enter the number to search")
search=tonumber(io.read())
while(x<=10)
do
if(no[x]==search)
then
pos=x
break
end
x=x+1
end
if(pos<0)
then
print("no not found")
else
print("no found at "..pos)
end
----------------------output----------------------
enter the number to search
6
no found at 5

Program to accept the numbers in an array unsorted order and display it in selection sort.
no={5,10,25,8,6,53,4,9,12,14}
x=1
tmp=0
print("before sorting")
while(x<=10)
do
io.write(no[x].." ")
x=x+1
end
print()
x=1
while(x<=10)
do
y=x+1
while(y<=10)
do
if(no[x]>no[y])
then
tmp=no[x]
no[x]=no[y]
no[y]=tmp
end
y=y+1
end
x=x+1
end
print("After sorting")
x=1
while(x<=10)
do
x=x+1
end
------------------output----------------------
before sorting
5 10 25 8 6 53 4 9 12 14
After sorting
4 5 6 8 9 10 12 14 25 53

program to swap first element with last, second to second last and so on (reversing elements)
no={5,10,25,8,6,53,4,9,12,14}
x=1
tmp=0
print("Before........")
while(x<=10)
do
x=x+1
end
x=1
print()
y=10
for x=1,math.floor(10/2)
do
tmp=no[x]
no[x]=no[y]
no[y]=tmp
y=y-1
end
print("nAfter........")
x=1
while(x<=10)
do
x=x+1
end
------------------output-------------------------
Before........
5 10 25 8 6 53 4 9 12 14
After........
14 12 9 4 53 6 8 25 10 5

Program to create a function name swap2best() with array as a parameter and swap all the even index value.
function swap2best(no)
x=1
tmp=0
while(x<=10)
do
x=x+1
end
x=1
print()
for x=1,10,2
do
tmp=no[x]
no[x]=no[x+1]
no[x+1]=tmp
end
print("nAfter........")
x=1
while(x<=10)
do
x=x+1
end
end
no={10,20,30,40,50,60,70,80,90,110}
swap2best(no)
-------------------output--------------------
Before........
10 20 30 40 50 60 70 80 90 110
After........
20 10 40 30 60 50 80 70 110 90

Program to print the left diagonal from a 2D array
function display(no,N)
x=1
tmp=0
while(x<=N)
do
y=1
while(y<=N)
do
io.write(no[x][y].."t")
y=y+1
end
print()
x=x+1
end
end
function displayleftdiagonal(no,N)
for x=1,N
do
print(no[x][x])
end
end
no={{1,2,3,4},{5,6,7,8},{9,10,11,12},{13,14,15,16}}
display(no,4)
displayleftdiagonal(no,4)
------------------output------------------
1 2 3 4
5 6 7 8
9 10 11 12
13 14 15 16
1
6
11
16

Program to swap the first row of the array with the last row of the array
function display(no,R,C)
x=1
tmp=0
print(".....................")
while(x<=R)
do
y=1
while(y<=C)
do
y=y+1
end
print()
x=x+1
end
end
function swapfirstwithlastR(no,R,C)
last=R
for x=1,C
do
tmp=no[1][x]
no[1][x]=no[last][x]
no[last][x]=tmp
end
end
no={{1,2,3,4,1,5,7},{5,6,7,8,8,9,4},{9,10,11,12,11,23,5},{13,14,15,16,1,2,8}}
display(no,4,7)
swapfirstwithlastR(no,4,7)
display(no,4,7)
------------------output--------------------
.....................
1 2 3 4 1 5 7
5 6 7 8 8 9 4
9 10 11 12 11 23 5
13 14 15 16 1 2 8
.....................
13 14 15 16 1 2 8
5 6 7 8 8 9 4
9 10 11 12 11 23 5
1 2 3 4 1 5 7

Program to print the lower half of the 2d array.
function display(no,R,C)
x=1
tmp=0
print(".....................")
while(x<=R)
do
y=1
while(y<=C)
do
y=y+1
end
print()
x=x+1
end
end
function lowerhalf(no,R,C)
for x=1,R
do
for y=1,C
do
if(x>=y)
then
io.write(no[x][y].." ")
end
end
print()
end
end
no={{1,2,3,4,1,5,7},{5,6,7,8,8,9,4},{9,10,11,12,11,23,5},{13,14,15,16,1,2,8}}
display(no,4,7)
lowerhalf(no,4,7)
-----------------output-------------------------
1 2 3 4 1 5 7
5 6 7 8 8 9 4
9 10 11 12 11 23 5
13 14 15 16 1 2 8
1
5 6
9 10 11
13 14 15 16

Programming in lua STRING AND ARRAY

Programming in lua STRING AND ARRAY

Recommended

More Related Content

What's hot (20)

Similar to Programming in lua STRING AND ARRAY (20)

More from vikram mahendra (20)

Recently uploaded (20)

Programming in lua STRING AND ARRAY