Citat:
dimnicar:
writeln ( 'Molim upisite broj sati provedenih u radu za nedelju dana ');
readln (brojsati);
if (brojsati> 0) and (brojsati <= 40) then ;
zarada := brojsati * satnica ;
if (brojsati > 40) and (brojsati<=60) then ; begin
zarada := (40 * satnica) + ((60- brojsati)* 2)) ;
writeln('Bruto nedeljna zarada radnika iznosi ',zarada );
readln
end else
writeln('Niste mogli raditi vise od 60 sati u nedelji ');
readln
writeln ( 'Molim upisite broj sati provedenih u radu za nedelju dana ');
readln (brojsati);
if (brojsati> 0) and (brojsati <= 40) then ;
zarada := brojsati * satnica ;
if (brojsati > 40) and (brojsati<=60) then ; begin
zarada := (40 * satnica) + ((60- brojsati)* 2)) ;
writeln('Bruto nedeljna zarada radnika iznosi ',zarada );
readln
end else
writeln('Niste mogli raditi vise od 60 sati u nedelji ');
readln
Samo tehnički gledano: crveno je višak a plavo manjak.