КАТЕГОРИИ:
Архитектура-(3434) Астрономия-(809) Биология-(7483) Биотехнологии-(1457) Военное дело-(14632) Высокие технологии-(1363) География-(913) Геология-(1438) Государство-(451) Демография-(1065) Дом-(47672) Журналистика и СМИ-(912) Изобретательство-(14524) Иностранные языки-(4268) Информатика-(17799) Искусство-(1338) История-(13644) Компьютеры-(11121) Косметика-(55) Кулинария-(373) Культура-(8427) Лингвистика-(374) Литература-(1642) Маркетинг-(23702) Математика-(16968) Машиностроение-(1700) Медицина-(12668) Менеджмент-(24684) Механика-(15423) Науковедение-(506) Образование-(11852) Охрана труда-(3308) Педагогика-(5571) Полиграфия-(1312) Политика-(7869) Право-(5454) Приборостроение-(1369) Программирование-(2801) Производство-(97182) Промышленность-(8706) Психология-(18388) Религия-(3217) Связь-(10668) Сельское хозяйство-(299) Социология-(6455) Спорт-(42831) Строительство-(4793) Торговля-(5050) Транспорт-(2929) Туризм-(1568) Физика-(3942) Философия-(17015) Финансы-(26596) Химия-(22929) Экология-(12095) Экономика-(9961) Электроника-(8441) Электротехника-(4623) Энергетика-(12629) Юриспруденция-(1492) Ядерная техника-(1748)
Разветвляющийся вычислительный процесс Пример 1.
Арифметические выражения. Линейный вычислительный процесс.
1)
S:=(1/2)*m*p+exp((1/3)*ln(p*(p+a)*(p+m)))
2)
F:=cos(x)/sqrt(1+sqr(m)+sin(x)/cos(x))
3)
Z:=sqrt(a+b*exp(sin(x))+1)
Рассчитать
Вариант 1
program A1;
var
a,b: integer;
y,x: real;
begin
writeln (‘введите а=’);
readln (a);
writeln (‘введите b=’);
readln (b);
writeln (‘введите x=’);
readln (x);
y:=a*sqr(x)+b*exp(3*ln(x));
writeln (‘y=’, y:8:3);
end.
program B1;
uses crt;
var
a,b: integer;
y,x: real;
begin
clrscr;
writeln(‘введите а=’); readln (a);
writeln(‘введите b=’); readln (b);
writeln(‘введите x=’); readln (x);
y:=a*sqr(x)+b*exp(3*ln(x));
writeln (‘y=’, y:8:3);
end.
Вариант 2
При решении задач могут возникать ситуации, когда действие осуществляется в зависимости от некоторого условия и выбора действия в зависимости от этого условия. Для этого используются условные операторы.
6 5IHpaM+snegQ1nEUtniEVbIEEQJ/hyNCksQg80xeLsh/AAAA//8DAFBLAQItABQABgAIAAAAIQC2 gziS/gAAAOEBAAATAAAAAAAAAAAAAAAAAAAAAABbQ29udGVudF9UeXBlc10ueG1sUEsBAi0AFAAG AAgAAAAhADj9If/WAAAAlAEAAAsAAAAAAAAAAAAAAAAALwEAAF9yZWxzLy5yZWxzUEsBAi0AFAAG AAgAAAAhAK8WPSPiAQAA2gMAAA4AAAAAAAAAAAAAAAAALgIAAGRycy9lMm9Eb2MueG1sUEsBAi0A FAAGAAgAAAAhAKHFL77eAAAACQEAAA8AAAAAAAAAAAAAAAAAPAQAAGRycy9kb3ducmV2LnhtbFBL BQYAAAAABAAEAPMAAABHBQAAAAA= "/>IF (x<2) then y:=a*b*sqr(x) else y:=sqrt (x)/a*b;
Пример 1. Составить задачу.
program A1;
var
a,b,x: integer;
y: real;
begin
writeln (‘введитеx=’); readln (x);
writeln (‘введите b=’); readln (b);
writeln(‘введите a=’); readln (a);
if (x>=5) then y:=a*exp(3*ln(x))+b
else y:=sqrt(x+b/a);
writeln (‘y=’, y:7:2);
readln;
end.
x
4 kv4AAADhAQAAEwAAAAAAAAAAAAAAAAAAAAAAW0NvbnRlbnRfVHlwZXNdLnhtbFBLAQItABQABgAI AAAAIQA4/SH/1gAAAJQBAAALAAAAAAAAAAAAAAAAAC8BAABfcmVscy8ucmVsc1BLAQItABQABgAI AAAAIQD+nl9G4AEAANoDAAAOAAAAAAAAAAAAAAAAAC4CAABkcnMvZTJvRG9jLnhtbFBLAQItABQA BgAIAAAAIQAszevV3gAAAAkBAAAPAAAAAAAAAAAAAAAAADoEAABkcnMvZG93bnJldi54bWxQSwUG AAAAAAQABADzAAAARQUAAAAA "/>
Пример 2. Составить задачу.
program A1;
var
x: integer;
T: real;
begin
writeln (‘введите x=’); readln (x);
if (T<2) then writeln (‘y=1’)
else writeln (‘y=привет’);
readln;
end.
2 gziS/gAAAOEBAAATAAAAAAAAAAAAAAAAAAAAAABbQ29udGVudF9UeXBlc10ueG1sUEsBAi0AFAAG AAgAAAAhADj9If/WAAAAlAEAAAsAAAAAAAAAAAAAAAAALwEAAF9yZWxzLy5yZWxzUEsBAi0AFAAG AAgAAAAhAKPQfjbiAQAA3AMAAA4AAAAAAAAAAAAAAAAALgIAAGRycy9lMm9Eb2MueG1sUEsBAi0A FAAGAAgAAAAhAALc1QDeAAAACQEAAA8AAAAAAAAAAAAAAAAAPAQAAGRycy9kb3ducmV2LnhtbFBL BQYAAAAABAAEAPMAAABHBQAAAAA= "/>
Дата добавления: 2014-12-10 ; Просмотров: 312 ; Нарушение авторских прав? Мы поможем в написании вашей работы!
Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет
5
