Предмет: Информатика,
автор: kristinamoskovskaya
Написать программу,которая по введенному числу от 1 до 12(номеру месяца) выдает все приходящиеся на этот месяц праздничные дни(например,если введено число 1,то должно получится 1 января-Новый год,7 января-Рождество).
Ответы
Автор ответа:
0
если будут где-то ошибки извините ,возможно в знаках)) проверьте в паскале ,если что напишите
program prazdnik;
var a : integer ;
begin
readln(a);
if a=1 then writeln ('пишите сюда праздиники в первый месяц,какие нужны');
if a=2 then writeln ('сюда то чт ово второй ');
if a=3 then writeln (' третий ') ;
if a=4 then writeln (' четвертый месяц с его праздниками');
if a=5 then writeln (' пятый месяц');
if a=6 then writeln (' шестой месяц');
if a=7 then writeln (' седьмой месяц');
if a=8 then writeln (' восьмой');
if a=9 then writeln (' праздники ');
if a=10 then writeln ('празники ');
if a=11 then writeln (' праздники 11 месяца');
if a=12 then writeln ('двенадцатый');
end.
program prazdnik;
var a : integer ;
begin
readln(a);
if a=1 then writeln ('пишите сюда праздиники в первый месяц,какие нужны');
if a=2 then writeln ('сюда то чт ово второй ');
if a=3 then writeln (' третий ') ;
if a=4 then writeln (' четвертый месяц с его праздниками');
if a=5 then writeln (' пятый месяц');
if a=6 then writeln (' шестой месяц');
if a=7 then writeln (' седьмой месяц');
if a=8 then writeln (' восьмой');
if a=9 then writeln (' праздники ');
if a=10 then writeln ('празники ');
if a=11 then writeln (' праздники 11 месяца');
if a=12 then writeln ('двенадцатый');
end.
Похожие вопросы
Предмет: Українська мова,
автор: povelkoaleksandra
Предмет: Українська мова,
автор: uljana198530
Предмет: Русский язык,
автор: baglukdima06
Предмет: Алгебра,
автор: хахарикус
Предмет: Литература,
автор: nesabudka001122