» Главная  » Программирование  » program z5

Оглавление

ЗАДАЧА 1 3

БЛОК-СХЕМА 3

ТЕКСТ ПРОГРАММЫ 3

ЗАДАЧА 2(А) 5

ТЕКСТ ПРОГРАММЫ 5

ЗАДАЧА 2(Б) 6

ТЕКСТ ПРОГРАММЫ 6

ЗАДАЧА 3 7

БЛОК-СХЕМА 7

ТЕКСТ ПРОГРАММЫ 7

ЗАДАЧА 4 9

БЛОК-СХЕМА 9

ТЕКСТ ПРОГРАММЫ 9

ЗАДАЧА 5 11

БЛОК-СХЕМА 11

ТЕКСТ ПРОГРАММЫ 11

Задача 1

Блок-схема

Текст программы

program z1;

var

x,y,z,t:real;

begin

writeln('Vvedite x:');

read(x);

writeln('Vvedite z:');

read(z);

if x*x+z*z>1 then

begin

t:=1+x*x+z*z;

end;

if x*x+z*z<1 then

begin

t:=x*x+z*z;

end;

if x*x+z*z=1 then

begin

t:=z;

end;

y:=(exp(1/3*ln(x)));

writeln('y=',y:6:2);

end.

Задача 2(а)

Текст программы

program z2a;

var

x,dx,y:real;

label l;

begin

dx:=0.2;

x:=-2-dx;

l:

x:=x+dx;

y:=x*x*sin(x)+exp(-(x+2));

writeln('y(',x:6:2,')=',y:6:2);

if (x>=-2) and (x<=2) then goto l;

end.

Задача 2(б)

Текст программы

program z2b;

var

y:real;

x:array[1..5] of real;

n:integer;

label l;

begin

x[1]:=-3;

x[2]:=-2.1;

x[3]:=-0.67;

x[4]:=1;

x[5]:=5.1;

n:=1;

while n<=5 do

begin

y:=x[n]*x[n]*sin(x[n])+exp(-(x[n]+2));

writeln('y(',x[n]:6:2,')=',y:6:2);

n:=n+1;

end;

end.

Задача 3

Блок-схема

Текст программы

program z3;

var

n,m:integer;

x,s:real;

begin

x:=1/6;

n:=6;

s:=0;

for m:=1 to n do

begin

s:=s+cos(m*x)/m;

end;

writeln('VICHISLENNAYA SUMMA ',s:6:2);

end.

Задача 4

Блок-схема

Текст программы

program z4;

var

x:array[1..5] of real;

s,p:real;

n:integer;

begin

x[1]:=0.321;

x[2]:=4;

x[3]:=0;

x[4]:=-2.1;

x[5]:=-16;

s:=0;

p:=1;

for n:=1 to 5 do

begin

if x[n]<>0 then

begin

s:=s+x[n];

p:=p*x[n];

end;

end;

writeln('SUMMA NENULEVIH ELEMENTOV ',s:6:2);

writeln('PROIZVEDENIE NENULEVIH ELEMENTOV ',p:6:2);

end.

Задача 5

Блок-схема

Во внешнем цикле изменяется n, во внутреннем на каждую n y изменяется пять раз. Так как n от 1 до 3, то значение z выведется на экран 15 раз.

Текст программы

program z5;

var

x,y,z,dy:real;

x_ar:array[1..3] of real;

n:integer;

begin

x_ar[1]:=4;

x_ar[2]:=-3;

x_ar[3]:=2.5;

dy:=0.6;

for n:=1 to 3 do

begin

x:=x_ar[n];

y:=2;

while (y>=2) and (y<=5) do

begin

z:=(x-y-exp(-y))/(sqr(x*x-y));

writeln('z=',z:6:2);

y:=y+dy;

end;

end;

end.

Примечаний нет.

" Программная поддержка принятия решений оператору с использованием нейронных сетей" ( Курсовая работа, 54 стр. )
"Автоматизированный лабораторный практикум "Разработка приложений для работы с базой данных в Visual Studio"" ( Отчет по практике, 29 стр. )
"Нелинейная цифровая фильтрация" ( Курсовая работа, 40 стр. )
"Основы теории управления"* ( Контрольная работа, 13 стр. )
"Программа для разархивации файла, созданного по алгоритму RLE" ( Контрольная работа, 11 стр. )
"Спроектировать базу данных для домашней библиотеки или фонотеки" ( Курсовая работа, 25 стр. )
"Технология "Millipede". Разработка модели форматирования в системе FAT 32." ( Контрольная работа, 10 стр. )
AJAX – интерфейс для системы CATS ( Курсовая работа, 13 стр. )
CMS для компании «КАРЛЭНД Сервис» ( Отчет по практике, 26 стр. )
JST Компилятор Smalltalk JVM ( Курсовая работа, 24 стр. )
Microsoft Excel ( Контрольная работа, 28 стр. )
PaketForm. Система обработки заявок на открытие счетов в ОАО АКБ «Росбанк». ( Отчет по практике, 29 стр. )
program z5 ( Контрольная работа, 11 стр. )
Web-рейтинг “Active Student” ( Курсовая работа, 13 стр. )
АВТОМАТИЗАЦИЯ ПРОЦЕССА ЮНИТ-ТЕСТИРОВАНИЯ ПРИЛОЖЕНИЯ «ПОЧТОВЫЙ КЛИЕНТ»: APPLICATION LAYER ( Курсовая работа, 22 стр. )
Автоматизация процесса создания выходной документации для ОАО “Черногорский Завод Искусственных Кож ( Дипломная работа, 182 стр. )
АВТОМАТИЗАЦИЯ ПРОЦЕССА ЮНИТ-ТЕСТИРОВАНИЯ ПРИЛОЖЕНИЯ «ПОЧТОВЫЙ КЛИЕНТ»: APPLICATION LAYER 2007-23 ( Курсовая работа, 23 стр. )
Автоматизированная система управления ОПтК ( Курсовая работа, 43 стр. )
Автоматизированная система оперативно-диспетчерского управления (АСОДУ) патентно-правового бюро «Эксперт» ( Дипломная работа, 116 стр. )
Автоматизированное рабочее место «СЕССИЯ» ( Курсовая работа, 41 стр. )
Автоматическое обновление метаданных на основе версий DDL ( Курсовая работа, 14 стр. )
Адаптивный алгоритм взаимодействия игровых объектов на основе классического алгоритма взаимодействия игровых объектов игр типа "змейка". ( Дипломная работа, 118 стр. )
Алгоритмизация и программирование процессов обработки данных ( Контрольная работа, 9 стр. )
Алгоритмические языки и теория програмирования ( Курсовая работа, 41 стр. )
Алгоритмические языки высокого уровня. Структура формального алгоритмического языка ( Контрольная работа, 14 стр. )


                                          /  8 (495) 971-76-12  /  info@refport.ru  /     ¤