%-------------------------------------%
% Lab 5: Temperature rating           %
% Date: 10/1/02                       %
%                                     %
% Gun Srijuntongsiri                  %
% gs61                                %
% ??????                              %
%-------------------------------------%

% Input temperature
temp = input('Enter temperature: ');

if temp < -459.67   % Check for impossible temperature
    disp('Invalid temperature.');
else  % otherwise, being

    % First, determine the main rating, store in $rating$
    if temp >= 90
        rating = 'hot';
    elseif temp >= 80
        rating = 'warm';
    elseif temp >= 70
        rating = 'OK';
    elseif temp >= 60
        rating = 'cool';
    else
        rating = 'cold';
    end

    % Now, determine the modifier. 
    remainder = mod(temp,10);
    
    modifier = '';              % intialize to be no modifier.

    if temp <= 50 | temp >= 99  % case with extreme value
        modifier = 'very ';
    elseif temp >= 80           % warm/hot part
        if remainder >= 7
            modifier = 'very ';
        elseif remainder <= 2
            modifier = 'almost ';
        end
    elseif temp < 70            % cool/cold part
        if remainder >= 7
            modifier = 'almost ';
        elseif remainder <= 2
            modifier = 'very ';
        end
    end        

    % Finally, report the rating
    disp(['Your temperature is ',modifier,rating,'.']);
end