Каждый школьник ежегодно отдыхает в каникулы, выходные и праздничные дни. во все оставшиеся дни кольнику положено учиться. в соответствии с дейст вули си на территории российской федерации норма тивными правовыми актами нерабочими праздничными днями считаются: 1-5 января. 7 января, 23 февраля, 8 марта, 1 мая, 9 мая, 12 июня, 4 ноября. если нерабо чий праздничный день приходится на выходной, то пре доставляется дополнительный нерабочий день.сделать 2 диаграммы: 1.столбчатую . 2. круговую.
Ответы
Var a, b, c: real; begin readln(a, b); c : = sqrt(sqr(a) + sqr(b)); writeln('sin a = ', b / c); writeln('cos a = ', a / c); writeln('tg a = ', b / a); writeln('ctg a = ', a / b); writeln(); writeln('sin b = ', a / c); writeln('cos b = ', b / c); writeln('tg b = ', a / b); writeln('ctg b = ', b / a); end.вот так)) удачи тебе)
Var a: array [1..20] of real; i: integer; b: real; begin for i : = 1 to 20 do begin a[i] : = random(100) - 50; writeln('[', i, '] => ', a[i]); end; writeln(''); for i : = 1 to 20 do begin b : = b + a[i]; end; b : = b / 20; for i : = 1 to 20 do begin if (a[i] < 0) then a[i] : = b; writeln('[', i, '] => ', a[i]); end; end.не самое короткое, зато наглядно =)
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос: