@echo off

setlocal EnableDelayedExpansion

set arr[0]=Tiketina
set arr[1]=Manytina
set arr[2]=Be abejones
set arr[3]=Taip, tikrai
set arr[4]=Gali tuo tiketi
set arr[5]=Mano manymu, taip
set arr[6]=Greiciausiai
set arr[7]=Rezultatas - geras
set arr[8]=Taip
set arr[9]=Zenklai rodo, kad taip
set arr[10]=Atsakymas neaiskus, bandyti dar karta
set arr[11]=Klauskite veliau
set arr[12]=Dabar atsakymo jums geriau nezinoti
set arr[13]=Dabar nuspeti negaliu
set arr[14]=Susikaupk ir klausk dar karta
set arr[15]=Daug nesitikek
set arr[16]=Mano atsakymas - ne
set arr[17]=Mano saltiniai sako - ne
set arr[18]=Rezultatas geras nenusimato
set arr[19]=Labai mazai tiketina

:ivestis

set /p klausmias="Ivekite klausima taip arba ne forma:"
set /a atsakymas=%RANDOM% %% 19
echo !arr[%atsakymas%]!

goto ivestis