Var
x, cs, tg: real;
begin
Write('Введите число в диапазоне [0..3.14]: ');
Readln(x);
if (x < 0) or (x > 3.14) then Writeln('Число вне диапазона')
else begin
cs := cos(x); tg := tan(x);
if cs > tg then Writeln('cosX > tgX')
else if cs = tg then Writeln('cosX = tgX')
else Writeln('cosX < tgX')
end
end.
Тестовое решение:
Введите число в диапазоне [0..3.14]: 1.58
cosX > tgX
Program n1;
var n: real;
begin
write('введите число: ');
readln(n);
if n>0 then writeln(n*n) else writeln(n*n*n);
end.
Нам дано, что на борту есть кок и капитан, т.е:
1) 15 голов - 1 кок - 1 капитан = 15-2= 13 - это количество матросов и котов вместе
Дальше нам сказано, что всего ЛАП И НОГ - 41:
2) От общего количества 41 - 1 нога капитана (т.к. было сказано, что капитан ОДНОНОГИЙ) - 2 ноги кока = 41 - 3 = 38 ног матросов и лап котов.
А дальше я сделала методом подбора, и у меня получилось 6 котов, 7 матросов, ну и кок с капитаном.
Проверка:
6*4 + 7*2 +1 + 2 = 41 ног и лап
6 + 7 + 1 + 1 = 15 голов
110 (2)
12(8)=1010 (2) Складываем два двоичных числа , получаем ответ:10000(2)=20(8)=16(10)=10(16)