Odpowiedzi

2009-04-20T16:11:23+02:00
Program dzień;
var a:integer;
begin
writeln (‘podaj liczbę’);
readln (a);
case a of
1: writeln (‘poniedziałek’);
2: writeln (‘wtorek’);
3: writeln (‘środa’);
4: writeln (‘czwartek’);
5: writeln (‘piątek’);
6: writeln (‘sobota’);
7: writeln (‘niedziela’);
else
writeln (‘podałeś złą liczbę’);
end;
readln;
end.


powinno byc dobrze...................