By using subroutine find the even numbers in the second quarter of matrix A(6,6). 10 DIM A(6*6) 20 FOR I=1 TO 6 10 DIM A(6,6) 20 FOR I-1 TO 6 30 FOR J-1 TO 6 40 INPUT ALJ) 50 NEXT J. NEXTI 60 FOR I=1 TO 3 30 FOR J-1 TO 6 40 INPUT AGJ) SO NEXT J NEXTI 60 FOR 1=1 TO 3 70 FOR J4 TO 6 80 GOSUB 150 90 NEXTI NEXTI 100 END 150 IF AL) MOD 2-0 THEN PRINTAQ) 160 RETURN 70 FOR J-4 TO 6 s0 GOSUB 150 90 NEXT J: NEXT I 100 END 150 IF AI) MOD 2=0 THEN PRINTA(I.) 160 RETURN Option 1 O Option 2 10 DIM A(6,6) 20 FOR I-1 TO 6 10 DIM A(6,6) 20 FOR I=1 TO 6 30 FOR J-1 TO 6 40 INPUT A(I) 50 NEXTJ NEXTI 60 FOR I=1 TO 3 30 FORJ-1 TO 6 40 INPUT AIJ) 50 NEXT J. NEXTI 60 FORI=1 TO 3 70 FORJ=1 TO 6 70 FOR J4 TO 6 80 GOSUB 150 90 NEXTJ. NEXTI 100 END 150 IF AI) MOD 2-0 THEN PRINTA(I) 160 RETURN 80 GOSUB 150 90 NEXT J NEXTI 100 END 150 IF AC) MOD2=0 THEN PRINTAI) 160 RETURN Option 3 Option 4

Computer Networking: A Top-Down Approach (7th Edition)
7th Edition
ISBN:9780133594140
Author:James Kurose, Keith Ross
Publisher:James Kurose, Keith Ross
Chapter1: Computer Networks And The Internet
Section: Chapter Questions
Problem R1RQ: What is the difference between a host and an end system? List several different types of end...
icon
Related questions
Question
i need the answer quickly
By using subroutine find the even numbers in the second quarter of
matrix A(6,6).
10 DIM A(6*6)
20 FOR I=1 TO6
10 DIM A(6,6)
20 FOR I-1 TO6
30 FOR J=1 TO 6
40 INPUT AIJ)
50 NEXTJ NEXTI
60 FOR I= 1 TO 3
70 FOR J-4 TO6
s0 GOSUB 150
90 NEXT J: NEXTI
100 END
150 IF AIJ) MOD 2-0 THEN PRINTA(IJ)
160 RETURN
30 FOR J=1 TO 6
40 INPUT AIJ)
50 NEXT J NEXTI
60 FOR I=1 TO 3
70 FOR J-4 TO 6
80 GOSUB 150
90 NEXT J NEXTI
100 END
150 IF ALJ) MOD 2-0 THEN PRINTAIJ)
160 RETURN
Option 1
Option 2
10 DIM A(6,6)
20 FOR I=1 TO 6
30 FOR J-1 TO 6
40 INPUT AIJ)
50 NEXT J NEXTI
60 FOR I= 1 TO 3
70 FOR J-4 TO 6
10 DIM A(6,6)
20 FOR I=1 TO 6
30 FOR J=1 TO6
80 GOSUB 150
90 NEXTJ. NEXTI
100 END
150 IF ALJ) MOD 2-0 THEN PRINTA(L.)
160 RETURN
40 INPUT AIJ)
50 NEXT J. NEXT I
60 FOR I=1 TO 3
70 FOR J=1 TO 6
80 GOSUB 150
90 NEXT J: NEXTI
100 END
150 IF AIJ) MOD 2-0 THEN PRINTA(IJ)
160 RETURN
Option 3
Option 4
10 Readx1,x2,x3,x4
20 Ar= (x1+x2+x3+x4)/4
30 Ge-(x1*x2*x3*x4)^(1/4)
40 Print "arithmetic mean is":ar
50 Print "geometric mean is";ge
60 Data 50,67,80,77
True
False
Transcribed Image Text:By using subroutine find the even numbers in the second quarter of matrix A(6,6). 10 DIM A(6*6) 20 FOR I=1 TO6 10 DIM A(6,6) 20 FOR I-1 TO6 30 FOR J=1 TO 6 40 INPUT AIJ) 50 NEXTJ NEXTI 60 FOR I= 1 TO 3 70 FOR J-4 TO6 s0 GOSUB 150 90 NEXT J: NEXTI 100 END 150 IF AIJ) MOD 2-0 THEN PRINTA(IJ) 160 RETURN 30 FOR J=1 TO 6 40 INPUT AIJ) 50 NEXT J NEXTI 60 FOR I=1 TO 3 70 FOR J-4 TO 6 80 GOSUB 150 90 NEXT J NEXTI 100 END 150 IF ALJ) MOD 2-0 THEN PRINTAIJ) 160 RETURN Option 1 Option 2 10 DIM A(6,6) 20 FOR I=1 TO 6 30 FOR J-1 TO 6 40 INPUT AIJ) 50 NEXT J NEXTI 60 FOR I= 1 TO 3 70 FOR J-4 TO 6 10 DIM A(6,6) 20 FOR I=1 TO 6 30 FOR J=1 TO6 80 GOSUB 150 90 NEXTJ. NEXTI 100 END 150 IF ALJ) MOD 2-0 THEN PRINTA(L.) 160 RETURN 40 INPUT AIJ) 50 NEXT J. NEXT I 60 FOR I=1 TO 3 70 FOR J=1 TO 6 80 GOSUB 150 90 NEXT J: NEXTI 100 END 150 IF AIJ) MOD 2-0 THEN PRINTA(IJ) 160 RETURN Option 3 Option 4 10 Readx1,x2,x3,x4 20 Ar= (x1+x2+x3+x4)/4 30 Ge-(x1*x2*x3*x4)^(1/4) 40 Print "arithmetic mean is":ar 50 Print "geometric mean is";ge 60 Data 50,67,80,77 True False
Expert Solution
steps

Step by step

Solved in 2 steps

Blurred answer
Recommended textbooks for you
Computer Networking: A Top-Down Approach (7th Edi…
Computer Networking: A Top-Down Approach (7th Edi…
Computer Engineering
ISBN:
9780133594140
Author:
James Kurose, Keith Ross
Publisher:
PEARSON
Computer Organization and Design MIPS Edition, Fi…
Computer Organization and Design MIPS Edition, Fi…
Computer Engineering
ISBN:
9780124077263
Author:
David A. Patterson, John L. Hennessy
Publisher:
Elsevier Science
Network+ Guide to Networks (MindTap Course List)
Network+ Guide to Networks (MindTap Course List)
Computer Engineering
ISBN:
9781337569330
Author:
Jill West, Tamara Dean, Jean Andrews
Publisher:
Cengage Learning
Concepts of Database Management
Concepts of Database Management
Computer Engineering
ISBN:
9781337093422
Author:
Joy L. Starks, Philip J. Pratt, Mary Z. Last
Publisher:
Cengage Learning
Prelude to Programming
Prelude to Programming
Computer Engineering
ISBN:
9780133750423
Author:
VENIT, Stewart
Publisher:
Pearson Education
Sc Business Data Communications and Networking, T…
Sc Business Data Communications and Networking, T…
Computer Engineering
ISBN:
9781119368830
Author:
FITZGERALD
Publisher:
WILEY