Var begin readln(n); if n=1 then begin writeln('1 месяц');writeln('кол-во дней');end; if n=2 then begin writeln('2 месяц');writeln('кол-во дней');end; if n=3 then begin writeln('3 месяц');writeln('кол-во дней');end; if n=4 then begin writeln('4 месяц');writeln('кол-во дней');end; if n=5 then begin writeln('5 месяц');writeln('кол-во дней');end; if n=6 then begin writeln('6 месяц');writeln('кол-во дней');end; if n=7 then begin writeln('7 месяц');writeln('кол-во дней');end; if n=8 then begin writeln('8 месяц');writeln('кол-во дней');end; И так до 12 раз... Я не уверен что тебе нужен такой монстр... В место к примеру 1 месяца пишешь январь...
begin
readln(n);
if n=1 then begin writeln('1 месяц');writeln('кол-во дней');end;
if n=2 then begin writeln('2 месяц');writeln('кол-во дней');end;
if n=3 then begin writeln('3 месяц');writeln('кол-во дней');end;
if n=4 then begin writeln('4 месяц');writeln('кол-во дней');end;
if n=5 then begin writeln('5 месяц');writeln('кол-во дней');end;
if n=6 then begin writeln('6 месяц');writeln('кол-во дней');end;
if n=7 then begin writeln('7 месяц');writeln('кол-во дней');end;
if n=8 then begin writeln('8 месяц');writeln('кол-во дней');end;
И так до 12 раз...
Я не уверен что тебе нужен такой монстр...
В место к примеру 1 месяца пишешь январь...
картинка
Объяснение:
Построения логических схем:
1) Определить число логических переменных (2 - А и В)
2) Определить количество базовых логических операций и их порядок (5 - НЕ А, НЕ В, НЕ А ИЛИ В, НЕ А ИЛИ НЕ В, (НЕ А ИЛИ В) И (НЕ А ИЛИ НЕ В)
3) Изобразить для каждой логической операции соответствующий ей элемент
4) Соединить вентили в порядке выполнения логических операций
Основные элементы логических схем (картинка)
НЕ (¬, черта над выражением) - значение противоположно исходному высказыванию
И (&, ∧) - истинно, когда оба исходных высказывания истинны
ИЛИ (∨) - ложно, когда оба исходных высказывания ложны