Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 13.07.2015 21:07
- Информатика
- remove_red_eye 6282
- thumb_up 35
Ответы и объяснения 1
Const h=1.5;
var c,m,x,l:real; i,n:integer;
begin
write('C='); readln(c);
write('M='); readln(m);
x:=c-h;
n:=round((m-c)/h)+1;
writeln(' x L');
for i:=1 to n do
begin
x:=x+h;
if x<-1
then l:=sin(x)*sin(x)+abs(x)
else if x<=5 then l:=100 else l:=(x+x*x+x*x*x)/10;
writeln(x:4:1,' ',l:7:3);
end;
end.
Пример:
C=-3
M=9
x L
-3.0 3.020
-1.5 2.495
0.0 100.000
1.5 100.000
3.0 100.000
4.5 100.000
6.0 25.800
7.5 48.563
9.0 81.900
- 14.07.2015 16:21
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.