1439/CH9/EX9.20/9_20.sce


1
2
3
4
5
6
7
8

clc 
//initialisation of variables
Kp= 1.78
P= 0.1 //atm
//CALCULATIONS
a= sqrt(Kp/(Kp+P))*100
//RESULTS
printf ('per cent dissaciated= %.1f per cent ',a)