Blogs

IITM General Question Paper

51. In a square , all the mid points are joined. the inner square is shaded. If the area of the square is A, what is the shaded area?

52. A man went to market with some money.With that money he can buy 15 pencils or 25 pens.He kept 15% of that money for bus fare and with rest of the money he purchased 5 pencils,and 'x' pens.How many pens he purchased?

53. A man climbing a wall.For every 4 steps go up he will slipdown 2 steps.If he takes 12 min to 3 steps.how much time it takes to climb 48 meters and one step=2 meters.

54. 33 1/3 of 101 + 296 is

55. One ship goes along the stream direction 28 km and in opposite direction 13 km in 5 hrs for each direction.What is the velocity of stream?

56. Cubic root of 3375=?

57. 2020201-565656=?

58. One clock ringes 7 O'clock in 7 sec.In how many seconds it will ring 10 O'clock.

59. One watch is showing 30 past 3 .What is the angle between minutes hours hand?

60. The average of 4 consecutive even numbers is 27. What is the largest number?

Continue Reading

IITM General Question Paper

41. x + 4y
--------- relation between x and y is x/2y = 3/2 ie x = 3y find the ratio
x-2y

42. On an item a company gave 25% discount then they get 25% profit if it gives 10% discount then what is the profit?

43. A person buys 1 liter milk for 12 Rs and to it he adds 1/3 of water and sells the milk at the rate of 15 Rs per liter then what is the % of profit

44. if a boat travels 148 kms in 8 hrs in down stream and 150 Kms in 20 hrs then what is the speed of the stream.

45. A can do a piece of work in 3 days, B can do thrice work in 8 days and c can do 5 times work in 15 days then in how
many days all three together can complete the work.

46. In 1978, a kg of paper was sold at Rs25/-. I f the paper rate increases at 1.5% more than inflation rate which is of 6.5% a year , then what wilbe the cost of a kg of paper after 2 years?

47. In A,B,C are having some marbles with each of them. A has given B and C the same number of marbles they already have to each of them. then, B gave C and A the same no. of marbles they have, then C gave A and B the same no. of marbles they have. At the end A,B,and C have equal no. of marbles.
(i) If x,y,z are the marbles initially with A,B,C respectively. then the no of marbles B have at the end
(a) 2(x-y-z) (b) 4(x-y-z) etc.

(ii)If the total no. of marbles are 72, then the no. of marbles with A at the starting
a. 20 b. 30 c. 32

48. If a car starts from A towards B with some velocity due to some problem in the engine after travelling 30km.If the car goes with 4/5 th of its actuval velocity the car reaches B 45min later to the actual time. If the car engine fails ofter travelling 45km, the car reaches the destination B 36min late to the actual time , what is the initial velocity of car and
what is the distance between A and B in km

49. A person has Rs 100/- in his pocket, he can as 25 pencils or 15 books. He kept 15% of the money for travelling expenses and purchased 5 pencils. So how many books he can purchase with the remaining money.

50. In a class , except 18 all are above 50 years. 15 are below 50 years of age. how many people are there

Continue Reading

READ MORE THAN DATABASE THROUGH EASYTRIEVE

//FILEOUT DD DSN=T54V01H.VS1Z.SPA5.REPT,
// DISP=(,CATLG,CATLG),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=27920),
// UNIT=SYSPD,SPACE=(CYL,(50,5),RLSE)
//SYSOUT DD SYSOUT=*
//SYSIN DD *
*-----------------------------------------------*
* DATA DIVISION SECTION *
*-----------------------------------------------*
FILE HV01BPAA DLI(HV01BPAA 1)
PCB-DBD-NAME 1 8 A
PCB-SEGMENT-LEVEL 9 2 A
PCB-STATUS-CODE 11 2 A
PCB-PROC-OPTION 13 4 A
PCB-RESERVE-DLI 17 4 B
PCB-SEGMENT-NAME 21 8 A
PCB-LENGTH-KEY-FB 29 4 B
PCB-NUM-SENS-SEGMENT 33 4 B
PCB-KEY-FB-AREA 37 24 A

*-----------------------------------------------*
* I/O AREAS *
*-----------------------------------------------*
%HV010IA1
%HV010IA3
%HV010IA5

*-----------------------------------------------*
* SSA-SPA1 *
*-----------------------------------------------*
SSA-HV01SPA1 W 35 A VALUE 'HV01SPA1'
SSA-HV01SPA1-IND SSA-HV01SPA1 +08 1 A VALUE '*'
SSA-HV01SPA1-CC1 SSA-HV01SPA1 +09 1 A VALUE '-'
SSA-HV01SPA1-CC2 SSA-HV01SPA1 +10 1 A VALUE '-'
SSA-HV01SPA1-CC3 SSA-HV01SPA1 +11 1 A VALUE '-'
SSA-HV01SPA1-CC4 SSA-HV01SPA1 +12 1 A VALUE '-'
SSA-HV01SPA1-CC5 SSA-HV01SPA1 +13 1 A VALUE '-'
SSA-HV01SPA1-CC6 SSA-HV01SPA1 +14 1 A VALUE '-'
SSA-HV01SPA1-CC7 SSA-HV01SPA1 +15 1 A VALUE '-'
SSA-HV01SPA1-CC8 SSA-HV01SPA1 +16 1 A VALUE '-'
SSA-HV01SPA1-LPA SSA-HV01SPA1 +17 1 A VALUE '('
SSA-HV01SPA1-NME SSA-HV01SPA1 +18 8 A VALUE 'KV01SPA1'
SSA-HV01SPA1-OPR SSA-HV01SPA1 +26 2 A VALUE '= '
SSA-HV01SPA1-KEY SSA-HV01SPA1 +28 6 A
SSA-HV01SPA1-RPA SSA-HV01SPA1 +34 1 A VALUE ')'
*-----------------------------------------------*
SSA-HV01SPA3-UNQUAL W 09 A VALUE 'HV01SPA3 '
*-----------------------------------------------*
SSA-HV01SPA5-UNQUAL W 11 A VALUE 'HV01SPA5*D '
*-----------------------------------------------*
* INPUT/OUTPUT FILES *
*-----------------------------------------------*
FILE FILEOUT
OUT-REC 01 080 A
OUT-ACCT 01 07 N
OUT-VEH 09 05 A
OUT-BAND-CNT 15 03 N
*-----------------------------------------------*
* WORKING STORAGE SECTION *
*-----------------------------------------------*
FUNCTION W 4 A
SSA-COUNT W 4 B VALUE 1
STATUS-SPA3 W 2 A VALUE ' '
STATUS-SPA5 W 2 A VALUE ' '
WS-INV-VEH W 2 A VALUE ' '
WS-BAND-CNT W 2 N VALUE 0
WS-CNT W 3 N VALUE 0
*-----------------------------------------------*
* PROCEDURE DIVISION SECTION *
*-----------------------------------------------*
JOB INPUT (HV01BPAA)
RETRIEVE HV01BPAA +
SELECT (HV01SPA1 ID 'A1')
IF PATH-ID = 'A1'
WS-CNT = WS-CNT + 1
STATUS-SPA3 = ' '
DO UNTIL STATUS-SPA3 = 'GE'
PERFORM READ-SPA3
END-DO
END-IF
*-----------------------------------------------*
READ-SPA3. PROC
*-----------------------------------------------*
FUNCTION = 'GNP '
SSA-COUNT = 2
SSA-HV01SPA1-KEY = KV01SPA1
DLI HV01BPAA HV01SPA3 FUNCTION +
SSANO SSA-COUNT +
SSA (SSA-HV01SPA1 +
SSA-HV01SPA3-UNQUAL)
STATUS-SPA3 = PCB-STATUS-CODE
IF STATUS-SPA3 = ' '
WS-INV-VEH = CINVSVHC-INV-VEH
IF WS-INV-VEH = 'FB'
WS-BAND-CNT = 0
DO UNTIL STATUS-SPA5 = 'GE'
PERFORM READ-SPA5
END-DO
ELSE
GO TO JOB
END-IF
END-IF
END-PROC.
*-----------------------------------------------*
READ-SPA5. PROC
*-----------------------------------------------*
FUNCTION = 'GNP '
SSA-COUNT = 3
SSA-HV01SPA1-KEY = KV01SPA1
DLI HV01BPAA HV01SPA5 FUNCTION +
SSANO SSA-COUNT +
SSA (SSA-HV01SPA1 +
SSA-HV01SPA3-UNQUAL +
SSA-HV01SPA5-UNQUAL)
STATUS-SPA5 = PCB-STATUS-CODE
IF STATUS-SPA5 = ' '
WS-BAND-CNT = WS-BAND-CNT + 1
END-IF
IF WS-BAND-CNT > 50
OUT-ACCT = ZPRTPACT-PART-ACCT-NO
OUT-VEH = CINVSVHC-INV-VEH
OUT-BAND-CNT = WS-BAND-CNT
PUT FILEOUT
END-IF
END-PROC.
/*

USING INPUT FILE READ MULTIPLE DATABASE THROUGH EASYTRIEVE

//FILEIN DD DSN=T54V01H.VSRJ.FB003.SSN,
// DISP=SHR
//FILEOUT DD DSN=T54V01H.VSRJ.WITHZE.MIX,
// DISP=(,CATLG,CATLG),
// DCB=(LRECL=100,RECFM=FB,BLKSIZE=0),
// UNIT=SYSPD,SPACE=(CYL,(100,10),RLSE)
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
* ----------------------------------------------*
* DATA DIVISION SECTION *
* ----------------------------------------------*
FILE HV01BPAA DLI(HV01BPAA 1)
PCB-DBD-NAME 1 8 A
PCB-SEGMENT-LEVEL 9 2 A
PCB-STATUS-CODE 11 2 A
PCB-PROC-OPTION 13 4 A
PCB-RESERVE-DLI 17 4 B
PCB-SEGMENT-NAME 21 8 A
PCB-LENGTH-KEY-FB 29 4 B
PCB-NUM-SENS-SEGMENT 33 4 B
PCB-KEY-FB-AREA 37 24 A
%HV010IA1
%HV010IA3
%HV010IAI
%HV010IA4

*-----------------------------------------------*
* SSA-QUAL *
*-----------------------------------------------*
SSA-HV01SPA1 W 35 A VALUE 'HV01SPA1'
SSA-HV01SPA1-IND SSA-HV01SPA1 +08 1 A VALUE '*'
SSA-HV01SPA1-CC1 SSA-HV01SPA1 +09 1 A VALUE '-'
SSA-HV01SPA1-CC2 SSA-HV01SPA1 +10 1 A VALUE '-'
SSA-HV01SPA1-CC3 SSA-HV01SPA1 +11 1 A VALUE '-'
SSA-HV01SPA1-CC4 SSA-HV01SPA1 +12 1 A VALUE '-'
SSA-HV01SPA1-CC5 SSA-HV01SPA1 +13 1 A VALUE '-'
SSA-HV01SPA1-CC6 SSA-HV01SPA1 +14 1 A VALUE '-'
SSA-HV01SPA1-CC7 SSA-HV01SPA1 +15 1 A VALUE '-'
SSA-HV01SPA1-CC8 SSA-HV01SPA1 +16 1 A VALUE '-'
SSA-HV01SPA1-LPA SSA-HV01SPA1 +17 1 A VALUE '('
SSA-HV01SPA1-NME SSA-HV01SPA1 +18 8 A VALUE 'KV01SPA1'
SSA-HV01SPA1-OPR SSA-HV01SPA1 +26 2 A VALUE '= '
SSA-HV01SPA1-KEY SSA-HV01SPA1 +28 6 A
SSA-HV01SPA1-RPA SSA-HV01SPA1 +34 1 A VALUE ')'

SSA-HV01SPA3 W 34 A VALUE 'HV01SPA3'
SSA-HV01SPA3-IND SSA-HV01SPA3 +08 1 A VALUE '*'
SSA-HV01SPA3-CC1 SSA-HV01SPA3 +09 1 A VALUE '-'
SSA-HV01SPA3-CC2 SSA-HV01SPA3 +10 1 A VALUE '-'
SSA-HV01SPA3-CC3 SSA-HV01SPA3 +11 1 A VALUE '-'
SSA-HV01SPA3-CC4 SSA-HV01SPA3 +12 1 A VALUE '-'
SSA-HV01SPA3-CC5 SSA-HV01SPA3 +13 1 A VALUE '-'
SSA-HV01SPA3-CC6 SSA-HV01SPA3 +14 1 A VALUE '-'
SSA-HV01SPA3-CC7 SSA-HV01SPA3 +15 1 A VALUE '-'
SSA-HV01SPA3-CC8 SSA-HV01SPA3 +16 1 A VALUE '-'
SSA-HV01SPA3-LPA SSA-HV01SPA3 +17 1 A VALUE '('
SSA-HV01SPA3-NME SSA-HV01SPA3 +18 8 A VALUE 'KV01SPA3'
SSA-HV01SPA3-OPR SSA-HV01SPA3 +26 2 A VALUE '= '
SSA-HV01SPA3-KEY SSA-HV01SPA3 +28 5 A
SSA-HV01SPA3-RPA SSA-HV01SPA3 +33 1 A VALUE ')'

SSA-HV01SPA4 W 33 A VALUE 'HV01SPA4'
SSA-HV01SPA4-IND SSA-HV01SPA4 +08 1 A VALUE '*'
SSA-HV01SPA4-CC1 SSA-HV01SPA4 +09 1 A VALUE '-'
SSA-HV01SPA4-CC2 SSA-HV01SPA4 +10 1 A VALUE '-'
SSA-HV01SPA4-CC3 SSA-HV01SPA4 +11 1 A VALUE '-'
SSA-HV01SPA4-CC4 SSA-HV01SPA4 +12 1 A VALUE '-'
SSA-HV01SPA4-CC5 SSA-HV01SPA4 +13 1 A VALUE '-'
SSA-HV01SPA4-CC6 SSA-HV01SPA4 +14 1 A VALUE '-'
SSA-HV01SPA4-CC7 SSA-HV01SPA4 +15 1 A VALUE '-'
SSA-HV01SPA4-CC8 SSA-HV01SPA4 +16 1 A VALUE '-'
SSA-HV01SPA4-LPA SSA-HV01SPA4 +17 1 A VALUE ' '
SSA-HV01SPA4-NME SSA-HV01SPA4 +18 8 A VALUE 'KV01SPA4'
SSA-HV01SPA4-OPR SSA-HV01SPA4 +26 2 A VALUE '= '
SSA-HV01SPA4-KEY SSA-HV01SPA4 +28 4 A
SSA-HV01SPA4-RPA SSA-HV01SPA4 +32 1 A VALUE ')'

SPA1-STATUS-CODE W 2 A VALUE ' '
SPA3-STATUS-CODE W 2 A VALUE ' '
SPAI-STATUS-CODE W 2 A VALUE ' '
SPA4-STATUS-CODE W 2 A VALUE ' '
SPA1-REPLACE-CODE W 2 A VALUE ' '
SPA3-REPLACE-CODE W 2 A VALUE ' '
SPAI-REPLACE-CODE W 2 A VALUE ' '
SPA4-REPL-CODE W 2 A VALUE ' '

SSA-HV01SPA3-UNQUAL W 09 A VALUE 'HV01SPA3 '

MIX-EFFDT W 7 N
PYMNT-STR W 2 A
MIX-ALLOC W 5 N 2

SSA-COUNT W 4 B VALUE 1
CTR W 6 N
FUNCTION W 4 A
COUNTER W 4 N
OUTPUT-WRITTEN W 1 A

FILE FILEIN
IN-REC 01 134 A
I1-ACCT 01 07 N
I1-VEH 13 05 A
I1-MIX-FB003 27 05 N 2
I1-MIX-FB001 66 05 N 2
I1-PART-SSN 84 09 N
FILE FILEOUT
O1-OUT-REC 01 80 A
O1-ACCT 01 07 N
O1-SSN 09 09 N
O1-PRO-DATE 19 07 N
O1-PRO-TIME 27 10 N
O1-EFF-DATE 38 07 N
O1-VEH-CODE 46 05 A
O1-NEW-PCT 52 05 N 2
O1-OPR-ID 58 07 A

CTR1 W 8 N 0
DTR1 W 8 N 0
ETR1 W 8 N 0
FTR1 W 8 N 0
*-----------------------------------------------*
* WORKIN STORAGE SECTION *
*-----------------------------------------------*
WS-PRO-DATE W 07 N VALUE 2110511
WS-PRO-TIME W 10 N VALUE 0000131737
WS-EFF-DATE W 07 N VALUE 2110511
WS-OPR-ID W 07 A VALUE 'FNDSUBY'
WS-SPA1-KEY W 6 A
W-PROC-COMP WS-SPA1-KEY 2 N VALUE 54
W-PART-ACCT-NO WS-SPA1-KEY +2 4 P 00

WS-SPA3-KEY W 5 A
WS-INV-VEH W 5 A
WS-INV-C W 5 A

WS-VEHICLE W 5 A
WS-VEH-PART1 WS-VEHICLE 1 A
WS-VEH-PART2 WS-VEHICLE +1 4 A
*-----------------------------------------------*
* PROCEDURE DIVISION SECTION *
*-----------------------------------------------*
JOB INPUT (FILEIN)

W-PART-ACCT-NO = I1-ACCT
SSA-HV01SPA1-KEY = WS-SPA1-KEY

SSA-COUNT = 1
FUNCTION = 'GU '

SPA1-STATUS-CODE = ' '
SPA4-STATUS-CODE = ' '

DLI HV01BPAA HV01SPA1 FUNCTION +
SSANO SSA-COUNT +
SSA (SSA-HV01SPA1)

SPA1-STATUS-CODE = PCB-STATUS-CODE
IF SPA1-STATUS-CODE = ' '
SPA3-STATUS-CODE = ' '
DO WHILE SPA3-STATUS-CODE = ' '
PERFORM GETNEXT-SPA3
END-DO
ELSE
DISPLAY 'A1 GET FAILED:' SPA1-STATUS-CODE
END-IF

*-----------------------------------------------*
GETNEXT-SPA3. PROC
*-----------------------------------------------*

SSA-COUNT = 2
FUNCTION = 'GNP'

DLI HV01BPAA HV01SPA3 FUNCTION +
SSANO SSA-COUNT +
SSA (SSA-HV01SPA1 +
SSA-HV01SPA3-UNQUAL)

SPA3-STATUS-CODE = PCB-STATUS-CODE
IF SPA3-STATUS-CODE = ' '
WS-INV-VEH = CINVSVHC-INV-VEH
PERFORM READ-SPA4
IF SPA4-STATUS-CODE = ' '
O1-ACCT = I1-ACCT
O1-SSN = I1-PART-SSN
O1-PRO-DATE = WS-PRO-DATE
O1-PRO-TIME = WS-PRO-TIME
O1-EFF-DATE = WS-EFF-DATE
O1-VEH-CODE = WS-INV-VEH
O1-NEW-PCT = MIX-ALLOC
O1-OPR-ID = WS-OPR-ID
PUT FILEOUT
MIX-ALLOC = 0
ELSE
IF SPA4-STATUS-CODE = 'GE'
DISPLAY 'FB001 NOT FOUND ' I1-ACCT
END-IF
END-IF
ELSE
DISPLAY 'A3 GET FAILED:' SPA3-STATUS-CODE
END-IF
END-PROC.
*-----------------------------------------------*
READ-SPA4. PROC
*-----------------------------------------------*
OUTPUT-WRITTEN = 'N'
FUNCTION = 'GNP '
SSA-HV01SPA3-KEY = WS-INV-VEH
SSA-COUNT = 3
SSA-HV01SPA4-IND = ' '
DLI HV01BPAA HV01SPA4 FUNCTION +
SSANO SSA-COUNT +
SSA (SSA-HV01SPA1 +
SSA-HV01SPA3 +
SSA-HV01SPA4)
SPA4-STATUS-CODE = PCB-STATUS-CODE

IF SPA4-STATUS-CODE = ' '
IF WS-INV-VEH = 'FB001'
MIX-ALLOC = (PCTMXPCT-CTMX-PCT + I1-MIX-FB003)
ELSE
IF WS-INV-VEH = 'FB003'
MIX-ALLOC = 0
ELSE
IF PCTMXPCT-CTMX-PCT > 0
MIX-ALLOC = PCTMXPCT-CTMX-PCT
DISPLAY 'OTHERVH' PCTMXPCT-CTMX-PCT
END-IF
END-IF
END-IF
END-IF

END-PROC.

IITM General Question Paper

31. Find next number 1,7,17,31,--,71

32. Out of 1800 coins one is lighter than others and in howmany attempts you can find that odd one?

33. out of 52 cards two are drawn consecutively. what is the probablility to get black king & black queen ?

34. Find next number 1,2,3,5,8, ..?

35. out of 100 students in the class 60 take hindi ,55 social, 65 english. Howmany students passed in atleast 2 subjects?

36. given word: h i n d. Find the odd man out ?

37. BIRD:HIPK::EMCR: ?

38. if a boat is moving in upstream with v1 km/hr and in the down stream it is moving with v2 km/hr then what is the speed of the stream.

39. 0.75 * 0.75 * 0.75 - 0.001
--------------------------------
0.75*0.75-0.075+0.01

40. A can work done in 8 days. B can work three timesfaster than the A. C can work five times faster asthe A;

Is it possible to have is numeric check in easytrive? How it can be used?

FILE INXXXX FB (XXX XXXXX)
IN-XXXXXX-RE 1 12 A
IN-CXXE 14 02 A
AN-COUNT 17 07 N
AA-DD 35 02 N
AA-MMM 38 03 A
AA-YYYY 42 04 N

FILE OUTXXXX FB (XXX XXXXX)
XXT-DATE 1 11 A
XXT-XXXXXX-RE 1 12 A
XXT-XXDE 14 02 A
AUT-COUNT 17 07 N

WS-I W 2 N
WS-AAAA W 11 A
WS-DD WS-AAAA 02 N
WS-FL WS-AAAA +02 01 A VALUE '-'
WS-MMM WS-AAAA +03 03 A
WS-FL1 WS-AAAA +06 01 A VALUE '-'
WS-YYYY WS-AAAA +07 04 N
WS-CNT W 2 N
WS-COUNT W 1 A
WS-RECORD-RE W 12 A VALUE 'XXXS-XXXXTEN'
WS-XXXX-TABLE W 21 A OCCURS 20
WS-RECORD-RE1 WS-XXXX-TABLE 12 A
WS-XXXXA WS-XXXX-TABLE +12 02 A
WS-AAAAAA WS-XXXX-TABLE +17 07 N

***********************************************************
JOB INPUT INXXXX
IF AA-DD NUMERIC AND AA-YYYY NUMERIC
WS-DD = AA-DD
WS-MMM = AA-MMM
WS-YYYY = AA-YYYY
AAT-AADE = WS-AAAA
PUT OUTXXXX
END-IF
IF AA-DD NUMERIC AND AA-YYYY NUMERIC AND +
AA-DD NE WS-DD AND AA-YYYY NE WS-YYYY AND WS-MMM NE AA-MMM
WS-COUNT = 'N'
END-IF
IF AN-XXXXXX-RE = 'XXXS-XXXXTEN'
WS-CNT = WS-CNT + 1
IF WS-CNT > 10
WS-COUNT = 'Y'
END-IF
IF WS-COUNT = 'Y'
AUT-XXXXXX-XE = AN-XXXXXX-RE
AAT-XXXE = XX-XXDE
AAT-COUNT = AN-COUNT
PUT OUTXXXX
WS-CNT = 0
END-IF
END-IF
//*

//*VALUE CLAUSE CAN BE USED IN EASYTRIEVE WHILE DECLARING VARIABLES

Syndicate content