Friday, 27 June 2014

Tuesday, 10 June 2014

RANA's Blog: WEB SPOOFING

RANA's Blog: WEB SPOOFING: WEB SPOOFING Abstract: Web spoofing is an Internet security attack that could endanger the privacy of World Wide Web us...

Friday, 28 March 2014

PL/SQL PROGRAM TO FIND BIG NUMBER

declare
a number:=&a;
b number:=&b;
c number:=&c;
begin
if( ( a > b) and ( a > c )) then
dbms_output.put_line('a is big');
elsif(( b > a ) and ( b > c )) then
dbms_output.put_line('b is big');
elsif(( c > a ) and ( c > b )) then
dbms_output.put_line('c is big');
end if;
end;




OUTPUT:


Enter value for a: 12
old   2: a number:=&a;
new   2: a number:=12;
Enter value for b: 50
old   3: b number:=&b;
new   3: b number:=50;
Enter value for c: 90
old   4: c number:=&c;
new   4: c number:=90;
c is big

Monday, 24 February 2014

MATRIX ADDITION USING COBOL LANGUAGE

       IDENTIFICATION DIVISION.
       PROGRAM-ID MAT-ADD.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
        01 MAT1.
           02 MR1 OCCURS 5 TIMES.
            03 MC1 PIC 9(2) OCCURS 5 TIMES.
        01 MAT2.
           02 MR2 OCCURS 5 TIMES.
            03 MC2 PIC 9(2) OCCURS 5 TIMES.
        01 MAT3.
           02 MR3 OCCURS 5 TIMES.
            03 MC3 PIC ZZZ(9) OCCURS 5 TIMES.
           77 ROW1 PIC 9.
           77 ROW2 PIC 9.
           77 COL1 PIC 9.
           77 COL2 PIC 9.
           77 I PIC 9.
           77 J PIC 9.
       PROCEDURE DIVISION.
       MAIN-PARA.
           DISPLAY 'MATRIX ADDITION'.
           DISPLAY '  '.
           DISPLAY 'ENTER THE NUMBER OF ROW AND COLUMNS OF 1 MATRIX'.
           ACCEPT ROW1.
           ACCEPT COL1.
           DISPLAY 'ENTER THE NUMBER OF ROW AND COLUMNS OF 2ND MATRIX'.
           ACCEPT ROW2.
           ACCEPT COL2.
           IF(ROW IS NOT EQUALS TO ROW2) OR (COL1 NOT EQUALS TO COL2)
           DISPLAY 'MATRIX ADDITION IS NOT POSSIBLE'
           ELSE
           PERFORM COMPU-PARA
           STOP RUN.
       COMPU-PARA.
           DISPLAY 'ENTER THE ELEMENTS OF MATRIX'.
           PERFORM ACCPARA1 VARYING I FROM 1 BY 1 UNTIL I > ROW1
           AFTER J FROM 1 BY 1 UNTIL J > COL1.
           DISPLAY 'ENTER THE ELEMENTS OF MATRIX2'.
           PERFORM ACCPARA2 VARYING I FROM 1 BY 1 UNTIL I > ROW2
           AFTER J FROM 1 BY 1 UNTIL J > COL2.
           PERFORM ADDMAT-PARA VARYING I FROM 1 BY 1 UNTIL I > ROW1
           AFTER J FROM 1 BY 1 UNTIL J > COL1.
           DISPLAY ( 1 1 ) ERASE.
           MOVE 3 TO LIN.
           MOVE 10 TO COL.
           DISPALY ' '.
           DISPLAY ' THE FIRST MATRIX IS'.
           DISPLAY ' '.
           PERFORM DISP1-PARA VARYING  I FROM 1 BY 1 UNTIL I > ROW1
           AFTER J FROM 1 BY 1UNTIL J > COL1.
           DISPLAY ' '.
           MOVE 10 TO LIN.
           MOVE 10 TO COL.
           DISPLAY ' '.
           DISPLAY 'THE SECOND MATRIX IS'.
           DISPLAY ' '.
           PERFORM DISP2-PARA VARYING  I FROM 1 BY 1 UNTIL I > ROW12
           AFTER J FROM 1 BY 1UNTIL J > COL1.
           DISPLAY ' '.
           MOVE  17 TO LIN.
           MOVE  10 TO COL.
           DISPLAY ' '.
           DISPLAY 'THE RESULTANT MATRIX IS'.
           DISPLAY '  '.
           PERFORM DISP-PARA VARYING  I FROM 1 BY 1 UNTIL I > ROW 1
           AFTER J FROM 1 BY 1UNTIL J > COL1.
           DISPLAY ' '.
       ACCPARA1.
           ACCEPT MC1 (I J).
       ACCPARA2.
           ACCEPT MC2 (I J).
       ADDMAT-PARA
           COMPUTE MC3 (I J) = MC1 (J I) + MC2 (I J).
       DISP-PARA
           DISPLAY (LIN . COL ) MC3 (I J).
           ADD 5 TO COL.
           IF J IS EQUAL TO COL
           ADD 1 TO LIN MOVE 10 TO COL.
       DISP1-PARA
           DISPLAY (LIN , COL ) MC1 (I J).
           ADD 5 TO COL.
           IF J IS EQUAL TO COL.
           ADD 1 TO LIN MOVE 10 TO COL
       DISP2-PARA.
           DISPLAY ( LIN, COL) MC1 (I J).
           ADD 5 TO COL.
           IF J IS EQUAL TO COL.
           ADD 1 TO LIN MOVE 10 TO COL
         
output:
  
enter the number of rows for 1 matrix:
2*2
enter the number of rows for 2 matrix:
2*2
enter the elements of 1 matrix:
1 2
3 4
the first matrix is
1 2
3  4
enter the second matrix:
3 4
6 7
the second matrix is:
3 4
6  7
the resultant matrix is:
4 6
9 11

Sunday, 19 January 2014

FIND OUT THE BIG VALUE USING JAVA PROGRAM

import java.io.*;
import java.lang.*;
class Bigvalue
{
public static void main(String[]args)
{
int a=5;
int b=2;
int c=7;

if((a>b)&&(a>c))
System.out.println("A is big");
else
if((b>a)&&(b>c))
System.out.println("b is big");
else
if((c>b)&&(c>a))
System.out.println("C is big");
}
}

Thursday, 13 June 2013

SIMPLE COBOL PROGRAM TO FIND OUT THE STUDENT TOTAL AND GRADES

     
/*COBOL  PROGRAM TO FIND OUT STUDENT GRADES. */

       IDENTIFICATION DIVISION.
       PROGRAM-ID STUDENTGRADE.
       ENVIRONMENT DIVISION.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
           77 M1 PIC 9(2).
           77 M2 PIC 9(2).
           77 M3 PIC 9(2).
           77 TOTAL PIC 9(4).
       88 FIRST1 VALUE 180 THRU 300.
       88 SECOND VALUE 150 THRU 179.
       88 THIRD VALUE 120 THRU 149.
       88 FAIL VALUE 0 THRU 119.
       PROCEDURE DIVISION.
       PARA.
           DISPLAY 'ENTER STUDENTMARKS'.
           ACCEPT M1.
           ACCEPT M2.
           ACCEPT M3.
           COMPUTE TOTAL = M1 + M2 + M3.
           DISPLAY TOTAL.
           IF FIRST1
           DISPLAY 'A GRADE'
           ELSE
           IF SECOND
           DISPLAY 'B GRADE'
           ELSE
           IF THIRD
           DISPLAY 'C GRADE'
           ELSE
           DISPLAY 'FAIL'
           STOP RUN.  



OUTPUT:


ENTER STUDENT MARKS
45
55
65
0165
B GRADE