Odpowiedzi

2010-02-17T16:39:28+01:00
Proste w Pascalu:


var
liczba: longint;

begin
read(liczba)
if not (liczba=0) then Liczba:=Liczba/5;
write(liczba);
readln; //czekaj
end;