Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 21.08.2018 07:59
- Информатика
- remove_red_eye 3823
- thumb_up 28
Ответы и объяснения 1
Var
x,y,z:real;
begin
Write(' X ');
x:=1;
while x<=3 do begin Write(x:8:5); x:=x+0.5 end;
Writeln;
z:=0.3;
while z<=1.5 do begin
Write('z=',z:3:1);
x:=1;
while x<=3 do begin
y:=exp(0.2*ln(exp(2/3-z)))/sqrt(exp(z*ln(x))+exp(x*ln(z)));
Write(y:8:5);
x:=x+0.5
end;
Writeln;
z:=z+0.3
end
end.
Результат выполнения программы:
X 1.00000 1.50000 2.00000 2.50000 3.00000
z=0.3 0.94379 0.94610 0.93621 0.92082 0.90387
z=0.6 0.80118 0.76823 0.73996 0.71451 0.69128
z=0.9 0.69240 0.63011 0.58342 0.54653 0.51632
z=1.2 0.60599 0.52409 0.46493 0.41998 0.38448
z=1.5 0.53536 0.44161 0.37562 0.32682 0.28913
- 22.08.2018 01:01
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.