Question

De la tastatura se introduce un numar natural ce reprezinta o perioada de timp , exprimata in minute,.Scruieti un program ce va afisa pe ecran perioada data , exprimata in ore, si minute. PASCAL

Answer 1

program timp;var min,h,timpul,aux:integer;begin
        h:=60;        readln(min); aux:=min;        if min<h then writeln(min,' min') else        if min mod h=0 then        begin                timpul:=min div h ;                writeln(timpul,' h');        end        else        begin                timpul:= min div h;                min:= aux-(timpul*60);                writeln(timpul,' h ',min,' min');                end;end.