сделать блок схему к этой задаче
program junk;
uses crt;
var m,d:byte;
begin
writeln('Введите дату рождения в формате дата месяц (пример 12 02) ');
readln(d,m);
case m of
1: if d<20 then writeln('Козерог') else writeln('Водолей');
2: if d<19 then writeln('Водолей') else writeln('Рыба');
3: if d<21 then writeln('Рыба') else writeln('Овен');
4: if d<20 then writeln('Овен') else writeln('телец');
5: if d<21 then writeln('Телец') else writeln('Близнецы');
6: if d<22 then writeln('Близнецы') else writeln('Рак');
7: if d<23 then writeln('Рак') else writeln('Лев');
8: if d<23 then writeln('Лев') else writeln('Дева');
9: if d<23 then writeln('Дева') else writeln('Весы');
10: if d<23 then writeln('Весы') else writeln('Скорпион');
11: if d<23 then writeln('Скорпион') else writeln('Стрелец');
12: if d<22 then writeln('Стрелец') else writeln('Козерог')
end;
readln
end.
Ответы
Ответ дал:
0
Ответ:
очень сложно не так ли мне это сложно так что пока
Вас заинтересует
3 месяца назад
4 месяца назад
4 месяца назад
2 года назад
2 года назад
7 лет назад