1 temperature unit form "F to °C and vice versa.

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 as soon as possible
QI) The following program convert temperature unit form F to °C and vice versa. Fill
out the blanks.
Main Program
Module
PROGRAM UsingModule
1)----------- TunitConversion
IMPLICIT NONE
CHARACTER UNIT
MODULE 5) ----
IMPLICIT NONE
6)
REAL FUNCTION c (XI)
IMPLICIT NONE
REAL, INTENT(7) ----------:: XI
c(X1-32)*9.0/5
END FUNCTIONC
REAL 8) --.-- f (XI)
IMPLICIT NONE
REAL, INTENT(IN) XI
f=X1* 9.0/5 +32
END FUNCTION 9)-
END 10) -- TunitConversion
REAL:X
WRITE(,YInput Temperature Value:"
READ(*,*) X
WRITE(*.YInput F or C:
2)----------- (*.*) UNIT
IF (UNIT 3)----F) THEN
WRITE(,) c (X). '"C
ELSEIF (UNIT=='C) THEN
WRITE(.)f (X),' '"F"
4)
END
Transcribed Image Text:QI) The following program convert temperature unit form F to °C and vice versa. Fill out the blanks. Main Program Module PROGRAM UsingModule 1)----------- TunitConversion IMPLICIT NONE CHARACTER UNIT MODULE 5) ---- IMPLICIT NONE 6) REAL FUNCTION c (XI) IMPLICIT NONE REAL, INTENT(7) ----------:: XI c(X1-32)*9.0/5 END FUNCTIONC REAL 8) --.-- f (XI) IMPLICIT NONE REAL, INTENT(IN) XI f=X1* 9.0/5 +32 END FUNCTION 9)- END 10) -- TunitConversion REAL:X WRITE(,YInput Temperature Value:" READ(*,*) X WRITE(*.YInput F or C: 2)----------- (*.*) UNIT IF (UNIT 3)----F) THEN WRITE(,) c (X). '"C ELSEIF (UNIT=='C) THEN WRITE(.)f (X),' '"F" 4) END
Expert Solution
steps

Step by step

Solved in 4 steps with 2 images

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