2870/CH6/EX6.1/Ex6_1.sce


1
2
3
4
5
6
7
8
9
10
11
12

clc;clear;
//Example 6.1

//givrn data
QH=80;
QL=50;

//calculations
Wnet=QH-QL;
disp(Wnet,'net power output in MW')
nth=Wnet/QH;
disp(nth,'the thermal efficiency')