РЕАЛІЗАЦІЯ ЦИКЛІВ У PASCAL. Лабораторна робота з Інші. Робота № 516630

РЕАЛІЗАЦІЯ ЦИКЛІВ У PASCAL

Інформація про навчальний заклад

ВУЗ:

Національний університет Львівська політехніка

Інститут:

Не вказано

Факультет:

Не вказано

Кафедра:

Кафедра інформаційних систем та мереж

Інформація про роботу

Рік:

2012

Тип роботи:

Лабораторна робота

Предмет:

Інші

Група:

КН

Завантажити

Частина тексту файла (без зображень, графіків і формул):

МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ „ЛЬВІВСЬКА ПОЛІТЕХНІКА” Кафедра інформаційних систем та мереж Лабораторна робота №5 на тему РЕАЛІЗАЦІЯ ЦИКЛІВ У PASCAL Львів-2009 Мета роботи ознайомлення із циклічними обчислювальними процесами та їх програмуванням на алгоритмічній мові Pascal.. Перший рівень Використовуючи оператори циклу, протабулювати значення функції y = f (x) на проміжку [a, b] з кроком dx . Результати обчислень представити у вигляді таблиці. Результати обчислення функції y = f (x) на проміжку [a, b] з кроком dx . program laba5_1; var b,dx,y,x:real; begin x:=-PI/2; b:=PI/2; dx:=PI/20; while x <= b do begin y:=cos(x)/sin(x); writeln ('x=',x:6:3,' y=',y:5:4); x:=x+dx; end; readln; end. Другий рівень Згідно номеру варіанта (див. умови у третьому рівні) скласти програму з використанням одного із операторів циклу. 5. Суму кубів всіх від’ємних елементів послідовності. program laba5_2; var a : Integer; s : Longint; Begin Readln (a); s:=0; while a<=50 do begin if a<0 then s:=s+a*a*a; a:=a+1; end; writeln(S); end. Третій рівень Згідно номеру варіанта скласти програму з використанням двох інших операторів циклу (відмінних від використаного в завданні другого рівня). 5. Суму кубів всіх від’ємних елементів послідовності. program laba5_31; var a : Integer; s : Longint; Begin Readln (a); s:=0; repeat begin if a<0 then s:=s+a*a*a; a:=a+1;end; until a>=50; writeln(S); readln; end var a : Integer; s : Longint; Begin Readln (a); s:=0; for a:=a to 100 do begin if a<0 then s:=s+a*a*a; a:=a+1; end; writeln(S); readln; end. Висновок на лабораторній роботі ознайомився із циклічними обчислювальними процесами та їх програмуванням на алгоритмічній мові Pascal.

Лабораторна робота Інші

iceman

15.03.2012 12:52

Коментарі

Ви не можете залишити коментар. Для цього, будь ласка, або зареєструйтесь.

Ділись своїми роботами та отримуй миттєві бонуси!

поділитись