Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 24.09.2018 14:41
- Информатика
- remove_red_eye 7952
- thumb_up 26
Ответы и объяснения 1
1.
var x,f:real;
begin
x:=2-0.1;
writeln(' x f(x)');
while x<3 do
begin
x:=x+0.1;
f:=sin(x)/ln(x*x)+cos(x)/ln(abs(x));
writeln(x:4:1,f:8:3);
end;
end.
2.
var x,p:real; i:integer;
begin
write('x = '); readln(x);
p:=1;
for i:=3 to 17 do p:=p*sin(i*pi*x)/(i*sqrt(x));
writeln('p = ',p);
end.
Блок-схемы - в прилагаемом файле.
- 25.09.2018 22:27
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.