path: root/1448/CH12/EX12.1.i/I12_1.sce

clc
//Initialization of variables
lmax=4.9*10^-7 //m
//calculations
T=2.9*10^-3 /lmax
//results
printf("Surface temperature must be close to %d K",T)