summaryrefslogtreecommitdiff
path: root/2411/CH5/EX5.2/Ex5_2.sce
blob: ee6e8742671c5a83cb0822be8eca38a415179f57 (plain)
1
2
3
4
5
6
7
8
9
// Scilab Code Ex5.2: Page-284 (2008)
clc; clear;
lambda_m = 4753e-010;    // Wavelength from the sun at which maximum energy is emitted, m
b = 2.88e-003;    // Wein's constant, m-K
T = b/lambda_m;    // Temperature of the surface of sun
printf("\nThe temperature of the surface of sun = %d K", ceil(T));

// Result
// The temperature of the surface of sun = 6060 K