Vytvorené: 30. 10. 2013 Tlačiť
![]() |
program Pocet_dni_v_mesiaci;
var
mesiac,pocet:integer;
begin
writeln ('Napiste cislo mesiaca a ja napisem, kolko ma dni.');
readln (mesiac);
pocet:=0;
case mesiac of
1,3,5,7,8,10,12 :pocet:=31;
2 :pocet:=28;
4,6,9,11 :pocet:=30;
end;
if pocet=0 then writeln ('Zly mesiac.')
else writeln ('Mesiac ma ', pocet,' dni.');
readln;
end.
![]() |
· Simulácie z fyziky· O Slovensku po slovensky· Slovenské kroje· Kurz národopisu· Diela maliarov· Kontrolné otázky, Domáce úlohy, E-testy - Priemysel· Odborné obrázkové slovníky· Poradňa žiadaného učiteľa· Rýchlokurz Angličtiny. Rozprávky (v mp3)· PREHĽADY (PRIBUDLO, ČO JE NOVÉ?)Seriály:· História sveta (1÷6)· História Slovenska (1÷5)· História módy (1÷5).
Členstvo na portáli
Poznámka pre autora
Copyright © 2013-2024 Wesline, s.r.o. Všetky práva vyhradené. Mapa stránky ako tabuľka | Kurzy | Prehľady |