Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 17.01.2018 02:00
- Информатика
- remove_red_eye 19661
- thumb_up 66
Ответы и объяснения 1
Var a, b, c, s, k: real;
begin
readln(a, b, c, k);
s := ((a * b - c * k) * a) / (b * b - a * c);
writeln('S = ', S);
writeln('F(S) = ', sin(3.14 / 6) - 0.5 * S / (a * b * c));
end.
2)
var l, m, n, k: real;
begin
readln(l, m, n);
k := (l - n) / (l * n) * n;
if ((k 1)) then
begin
writeln('X = ', (sqr(l) - n) / m);
writeln('Y = ', k * (l - m) / l);
end
else
begin
writeln('X = ', (k * l * m) / n);
writeln('Y = ', l * m * k);
end;
end.
- 18.01.2018 21:12
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.