- 08.12.2017 22:18
- Информатика
- remove_red_eye 15259
- thumb_up 48
Ответы и объяснения 1
Begin
var
x, y, a : real;
x := 0.1;
a := 0.15;
while x <= 0.9 do begin
y := ((4*sqrt(1-a*sqr(x)))/(1+sqr(a)+sqr(x)))+sqrt(1-sqr(x));
writeln('x=', x, '; y=', y);
x += 0.2;
end;
end.
надеюсь, я ничего не забыл ^^
- 09.12.2017 20:20
- thumb_up 32
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.