Партнерка на США и Канаду по недвижимости, выплаты в крипто

  • 30% recurring commission
  • Выплаты в USDT
  • Вывод каждую неделю
  • Комиссия до 5 лет за каждого referral

1) После имени стандартной функции в скобках записывается аргумент, который может быть:

а) константой: например cos(1.3),

б) переменной: например cos(x),

в) арифметическим выражением: например cos(x+y),

г) стандартной функцией: например cos(ln(x));

2) Аргумент тригонометрической функции должен быть задан в радианах. Если он задан в градусах, то его следует перевести в радианы по формуле:

.

3) Логарифмические функции:

.

4) Обратные тригонометрические функции:

; ; .

5) Гиперболические функции:

; ; ; .

6) Возведение в степень:

; .

7) Тригонометрические функции: tg x = sin x/cos x; ctg x = cos x/ sin x.

2.1.4. Арифметические, логические, символьные выражения

а) Арифметические выражения

Пример арифметического выражения.

.

В Турбо Паскале есть все 4 арифметические операции над числовыми переменными:

а) + сложение; б) – вычитание;

в) * умножение; г) / деление вещественное;

Для данных типа INTEGER в Турбо Паскале есть еще операции деления:

    MOD получение остатка от целочисленного деления, DIV частное от целочисленного деления.

Пример. Найти частное A/Z. На Паскале частное A/Z имеет вид: A div Z.

Пример. Найти остаток от деления A/Z. На Паскале остаток от деления A/Z имеет вид:

A mod Z.

F:=17 DIV 5; – деление нацело, ответ: 3;

R:=17 MOD 5; – остаток от деления нацело, ответ: 2.

б) Логические выражения

Пример логических выражений:

(A>0) and (B>0) означает (А и В больше нуля).

(A>0) or (B>0) означает (А или В больше нуля).

В Турбо Паскале определены следующие логические операции:

НЕ нашли? Не то? Что вы ищете?

1) not (NOT) – логическое НЕ (логическое отрицание);

2) and ­­­­­(AND) – логическое И (конъюнкция или логическое умножение);

3) or (OR) – логическое ИЛИ (дизъюнкция или логическое сложение);

4) xor (XOR) – исключающее ИЛИ;

5) eqv (EQV) – эквивалентность;

6) IMP – импликация (если…, то…).

2.2. Структура программы на языке Паскаль

Структура программы на языке Turbo Pascal имеет следующий вид:

Таблица 4.2

Структура программы на языке Turbo Pascal

Комментарий

1

PROGRAM Pr;

Заголовок не обязателен

2

Раздел описаний

Не исполняемая часть программы

3

Begin

Начало раздела операторов

4

Раздел операторов

Исполняемая часть программы

5

END.

Конец раздела операторов

Выделяют две части программы:

1. Раздел описаний. В разделе описаний задаётся описание констант ключевым словом const, переменные в этом разделе задаются ключевым словом var, описание нового типа переменных задаётся ключевым словом type.

2. Раздел операторов. Этот раздел является исполняемой частью программы. Чтобы отделить раздел описаний от раздел операторов между ними вставляется слово begin, которое означает начало исполняемой части программы. Раздел операторов заканчивается словом end., обязательно в конце должна быть точка. Пара (begin…end)называется операторными скобками.

Такая структура обязательна для любой программы, что является следствием жесткого требования языка: любой нестандартный для языка Турбо Паскаль идентификатор, используемый в исполняемых операторах, должен быть предварительно описан в разделе описаний.

Описать идентификатор – это значит указать тип связанного с ним объекта программы (константы или переменной).

2.3. Основные операторы Паскаля

Оператор языка - это зарезервированная комбинация символов.

2.3.1. Оператор присваивания

Пример 1.

Представлен оператор присваивания:

R: =cos(x)+ln(y);

Оператор присваивания выполняется в два этапа:

1. Первый этап – выполнение правой части, т. е. в примере вычисляется арифметическое выражение.

2. Второй этап – присвоение результата левой части, т. е. в примере переменной R присваивается число, полученное при вычислении арифметического выражения.

Примечание. Недопустима запись оператора присваивания в виде: cos(x)+ln(y):=R;

2.3.2. Операторы ввода

В Паскале нет специальных операторов ввода-вывода. Для обмена информацией в программах Паскаля используются специальные встроенные процедуры, которые не нуждаются в предварительном описании. Таким образом, все операторы ввода-вывода являются операторами обращения к встроенным процедурам ввода или вывода данных.

По операторам READ, READLN вызывается встроенная процедура ввода данных и программа останавливается в ожидании ввода.

Пример. READLN (X, Y);

Следует набрать на клавиатуре два числа через пробел и нажать клавишу «Ввод».

2.3.3. Операторы вывода

Основное назначение этих операторов – вывод результатов выполнения программы. Оператор вывода WRITE выводит строку на экран и оставляет курсор в конце выведенной строки. Если в программе несколько операторов WRITE, то вывод осуществляется в одну строку.

Оператор вывода WRITELN выводит в отдельную строку, после вывода результата осуществляет перевод строки и устанавливает курсор в начало следующей строки экрана. Пример записи оператора вывода переменных X, Y,Z:

WRITELN(X, Y,Z);

Если в программе необходимо вывести текст на экран, следует этот текст заключить в апострофы. В частности подсказка на экран для ввода данных записывается оператором:

WRITELN(‘ввести X, Y,Z’);

2.3.4. Комментарий

Комментарий в Турбо Паскале – это произвольная последовательность любых символов, обрамленная фигурными скобками. Комментарий разрешается вставлять в любое место программы, где по смыслу должен стоять пробел. В качестве ограничителей комментария допускается использование фигурных скобок «{» и «}», а также пары символов «(*» – слева от комментария и «*)» – справа от него:

{Это – комментарий}. (*Это тоже комментарий*).

2.4. Операторы передачи управления

Назначение операторов передачи управления заключается в организации ветвлений в программе: условных или безусловных. С помощью этих операторов вычислительный процесс передается в указанную оператором точку программы по указанному в операторе условию либо без условия.

2.4.1. Оператор безусловного перехода

Действие оператора GOTO состоит в передаче управления соответствующему оператору. Структура оператора:

GOTO метка;

Метка в Турбо Паскале – это произвольный идентификатор, позволяющий именовать некоторый оператор программы и таким образом ссылаться на него. Метка располагается непосредственно перед помечаемым оператором и отделяется от него двоеточием. Перед тем как появиться в программе, метка должна быть задана в разделе описанания. Описание меток состоит из зарезервированного слова LABEL (метка), за которым следует список меток.

Пример 2.

LABEL 1; {в разделе описания};

goto 1; {в разделе операторов} {перейти на метку 1}

1: read(x, y); {строка с меткой 1 в разделе операторов}

При исполнении меток необходимо руководствоваться следующими правилами:

1) метка, на которую ссылается оператор GOTO, должна быть задана в разделе описаний и она обязательно должна встретиться где-нибудь в теле программы;

2) метки, описанные в процедуре (функции), локализуется в ней, поэтому передача управления извне процедуры (функции) на метку внутри неё невозможна.

Однако в программировании не рекомендуется использование оператора GOTO, т. к. это затрудняет понимание программ, делает ее запутанной и сложной в отладке. Современная технология структурного программирования основана на принципе программирования без GOTO.

2.4.2. Операторы условного перехода

Структура условного оператора имеет следующий вид:

IF <условие> THEN <оператор 1> ELSE <оператор 2>;

где: IF, THEN, ELSE – зарезервированные слова (если, то, иначе);

<условие> – произвольное выражение логического типа;

<оператор 1>, <оператор 2> – любые операторы языка Турбо Паскаль.

Условный оператор работает по следующему алгоритму. Вначале вычисляется условное выражение <условие>. Если результат есть TRUE (истина), то выполняется <оператор 1>, а <оператор 2> пропускается; если результат есть FALSE (ложь), наоборот, <оператор 1> пропускается, а выполняется <оператор 2>.

Поскольку любой из операторов <оператор 1> и <оператор 2> может быть любого типа, в том числе и условным, а в то же время не каждый из «вложенных» условных операторов может иметь часть ELSE <оператор 2>, то возникает неоднозначность трактовки условий. Эта неоднозначность в Турбо Паскале решается следующим образом: любая встретившаяся часть ELSE соответствует ближайшей к ней «сверху» части THEN условного оператора. Условный оператор позволяет проверить некоторое условие и в зависимости от результатов поверки выполнить то или иное действие. Таким образом, условный оператор – это средство ветвления вычислительного процесса.

Операторы условного перехода подразделяются на: простые и составные, на короткие и полные.

1) Простой, короткий IF (если)

Структура оператора имеет вид:

IF (условие) THEN (оператор или метка);

Пример 3.

Вычислить y: = ln x, если x > 0.

Программа имеет вид:

Program PR3;

Var

y, x : real;

begin

writeln(‘ввести x’);

Readln (x);

{простой, короткий IF}

IF x > 0 THEN y: = ln(x);

writeln ( ‘x=’, x:7:2, ‘ y=’, y:7:2 );

end.

2) Простой, полный IF

Пример 4.

Вычислить y = ln x, если X>0, иначе y=cos x.

В примере 4 рассматривается не только вариант «тогда», но и «иначе».

Программа имеет вид:

Program PR4;

var

x, y: real;

begin

writeln(‘ввести х’);

Readln (х);

{простой, полный IF}

if x>0 THEN y:= ln (x) ELSE y:=cos(x);

Writeln (‘x = ‘, x:6:2 , ‘ y = ‘, y:7:2)

end.

Если Х > 0, тогда выполняется оператор за словом THEN, иначе выполняется оператор, следующий за этой строкой.

3) Составной, короткий IF

Составной оператор – это последовательность произвольных операторов программ, заключенная в операторные скобки – зарезервированные слова BEGIN…END. Составные операторы – важный инструмент Турбо Паскаля, дающий возможность писать программы по современной технологии структурного программирования (без перехода GOTO).

Язык Турбо Паскаль не накладывает никаких ограничений на характер операторов, входящих в составной оператор.

Пример 5.

Вычислить y=ln x, z=y–5×x, если x > 0.

Оператор условия запишется в виде:

IF x>0 then

Begin

y:=Ln(x);

z:=y–5*x;

Writeln (’y = ‘, y:7:2, ‘z =’, z:8:3)

end;

4) Составной, полный IF

Рассмотрим задание примера 4, но вывод делается для каждого условия.

Пример 6.

Оператор условия запишется в виде:

IF x>0 then

Begin

Y:=ln (x);

Writeln (‘x = ‘, x:6:2 ,’ y =’, y:7:2);

End

Else

begin

Y:=cos (x);

Writeln (‘x = ‘, x:6:2 ,’ y =’, y:7:2);

End;

В примере 6 после слов then, еlse операторы заключены в операторные скобки.

5) Структурированный (разветвленный) IF

Среди условных операторов можно выделить структурированный, который предполагает проверку условий путём вложения.

5.1) Структурированный, короткий, простой IF.

В структурированном операторе содержится последовательная проверка вложенных условий.

Пример 7.

Вычислить r=ln(x+y+z), если x > 0, y > 0, z > 0.

Оператор условия запишется в виде:

IF x>0 then

IF y>0 then

IF z>0 then

R:=LN(X+Y+Z);

Пример 8.

Можно этот пример записать иначе коротким, простым IF с логическим выражением:

IF (x>0) and (y>0) and (z>0) then R:=LN(X+Y+Z);

Пример 9.

Вычислить r=x+y+z, если выполняется хотя бы одно из условий x>0, y>0, z>0. Оператор условия запишется в виде:

IF (x>0) or (y>0) or (z>0) then R:=(x+y +z);

В примерах 8, 9 логические выражения включают в себя логические операции.

5.2) Структурированный, полный, простой IF.

Пример 10.

Вычислить:

r=ln(x+y+z), если x>0, y>0, z>0;

r=ln (x+y)+ z, если x>0, y>0;

r=ln (x)+y+ z, если x>0, иначе r = x+y+z.

Оператор условия запишется в виде:

IF x>0 then

IF y>0 then

IF z>0 then r:=ln (x+y+z)

Else r:= ln (x+y)+z

Else r:= ln (x)+y+z

Else r:= x+y+z;

Вначале проверяются три условия. Если они выполняются, то вычисляется r=ln(x+y+z). Иначе выполняются первые два условия, а последнее не выполняется и z ≤ 0 (первое слово else относится к последнему условию). В этом случае вычисляется r=ln(x+y)+z.

Если из двух условий выполняется только первое, то вычисляется r=ln x+y+z (второе слово else относится ко второму условию) и в этом случае y ≤ 0. Последнее слово else относится к первому условию и в этом случае х ≤ 0. В этом случае вычисляется r=x+y+z.

3. Примеры выполнения задания к практическому занятию № 4

3.1. Программы линейных алгоритмов

Пример 11.

Написать программу линейного алгоритма примера 8 практической работы №1.

Вычислить и вывести на экран значение функции:

Y = sin (x+30)/(a + x)+b*a;

Значение х ввести в градусах.

Решение.

В программе примера 11 после слова «BEGIN» перед операторами в фигурных скобках даются комментарии, поясняющие действия этих операторов.

PROGRAM PR11;

VAR

a, b, x, y:real;

BEGIN

{На экран выводится подсказка – текст в скобках}

Writeln (‘ввести a, x, b’);

{Ввод с клавиатуры переменных a, x, b}

Readln (a, x, b);

{перевод из градусов в радианы переменной х}

x:=x*pi/180;

y: = sin (x+30*pi/180)/(a + x)+b*a;

{Вывод переменных a, x, b}

Writeln (‘a=’, a: 7:3,’ x=’, x: 7:3,’ y=’, y: 7:3);

END.

В примере11 вывод переменных записан в формате с фиксированной точкой.

Примечание.

Необходимо учесть последовательность действий при выполнении арифметического выражения с учётом приоритета арифметических действий:

а) вычисляются скобки: первая слева и вторая,

б) вычисляется синус первой скобки,

в) выполняется операция деления синуса на вторую скобку,

г) выполняется операция умножения b*a,

д) выполняется операция сложения

3.2. Программы разветвляющихся алгоритмов

Пример 12.

Написать программу разветвляющегося алгоритма примера 9 практической работы №1.

Если х>0, тогда вычислить:

y = lg(x) + (a-d)/(d+b);

иначе вычислить:

y=sin (x)/(a + b)-b/d.

PROGRAM PR12;

VAR

a, b, d, x, y:real;

BEGIN

{На экран выводится подсказка – текст в скобках}

Writeln (‘ввести a, x, b, d’);

{Ввод с клавиатуры переменных a, x, b, d}

Read (a, x, b, d);

{перевод из градусов в радианы переменной х}

x:=x*pi/180;

if x>0 then

y: = ln(x)/ln(10) + (a-d)/(d+b)

else

y:=sin (x)/(a + b)-b/d;

{Вывод результата}

Writeln (’y=’, y: 7: 3);

END.

Пример 13.

Дана точка А (X, Y) с координатами X, Y не равными нулю.

Найти четверть, в которой находится эта точка.

Program Pr 13;

Var

X, Y: integer;

Begin

writeln(‘ввести координаты т. А: X, Y’);

Readln (x, y);

IF (x>0 ) and (y>0) then writeln (‘т. A: в 1четверти’)

else

IF (x>0) and (y<0) then writeln (‘т. А в 4 четверти’)

else

IF y>0 then writeln (‘т. А во 2 четверти’)

else writeln (‘т. А в 3 четверти’);

End.

Каждому ELSE соответствует предыдущее свободное then.

4. Задания к практическому занятию № 4

    Написать программу для линейного алгоритма, выполненного в практической работе №1. Написать программу для разветвляющегося алгоритма, выполненного в практической работе №1. Ввести каждую программу в компьютер, сохранить в разных файлах. Запустить каждую программу, исправить ошибки, ввести данные, получить результат. Представить преподавателю программу с полученным результатом на компьютере. Оформить и защитить работу преподавателю (тест по данной теме).

Задания ИДЗ №3 по теме: «Программирование. Линейные процессы. Ветвления» в Приложении №1 (Задание 4).

5. Вопросы для самоконтроля к практическому занятию № 4

1. Во фрагменте программы:

begin

writeln ( ‘ x, y’);

readln(x, y,z);

z:=x+y;

writeln ( x, y,z);

end.

Представлен раздел:

1) операторов; 2) описания переменных; 3) ввода данных; 4) вывода данных.

2. Во фрагменте программы:

var

x, y,z: real;

выполняется описание:

1) числовых переменных целого типа;

2) числовых переменных вещественного типа;

3) описание констант;

4) ввода данных.

3. Укажите правильно записанное логическое выражение на паскале:

1) r<0 and r>0;

2) 0 <x<1 and y >x;

3) (z>y) or (z<x) ;

4) A>B>C<0.

4. В программе паскаля оператор: writeln(‘z=’, z: 8: 4):

1) вводит данные с клавиатуры;

2) выводит на экран подсказку;

3) выводит переменную с плавающей запятой;

4) выводит переменную с фиксированной точкой.

5. В результате работы линейного алгоритма:

x:=5

y:=x+1;

x:=2*y;

y:=x+y;

вывод y.

Переменная У приняла значение:

1) 16; 2) 5; 3) 6;

6. В результате работы линейного алгоритма:

y:=x+3;

x:=2*y;

y:=x+y;

вывод y.

Переменная У приняла значение 18. Указать значение Х до начала работы алгоритма.

1) 7; 2) 3; 3) 5;

7. Укажите правильно записанный оператор присваивания на паскале:

1) z:= cos(x) + ln(y);

2) cos(x):= z+ln(y);

3) z =cos(x)+log(y);

4) a+b:=c+d.

8. При x, y: integer;

в результате выполнения фрагмента программы:

x := -5; y := -10;

if abs (x) > abs(y) then x := x + 15 else y:=x-y;

write (x, y);

на экран будет выведено:

1) 5; - 10;

2) 10; -10;

3) 10; 5;

4) -5; 5.

Практическое занятие № 5. Программирование. Циклы

1. Цель занятия

Цель занятия – знать операторы цикла. Уметь записать алгоритм цикла в виде программы Turbo Pascal, ввести в компьютер и запустить программу, получить результат.

2. Теоретический материал для практического занятия № 5

2.1. Оператор цикла с параметрами

Счетный оператор цикла FOR имеет структуру:

а) FOR i:=a TO b DO <оператор>;

Здесь FOR, TO, DO – зарезервированные слова (для, до, выполнить);

i – переменная цикла типа INTEGER;

a – начальное значение переменной цикла (тип INTEGER);

b – конечное значение переменной цикла (тип INTEGER);

<оператор> – произвольный оператор Турбо Паскаля.

Шаг изменения параметра цикла равен единице.

Алгоритм выполнения оператора цикла с параметрами при выполнении оператора FOR:

вначале осуществляется присваивание i:=a; проверяется условие i > b; если это условие выполняется, то следует выход из цикла, иначе на пункт 3; выполняется тело цикла; счётчик увеличивается на единицу: i:=i + 1; переход на 2; при выполнении условия i > b цикл заканчивается.

Пример 1.

Найти сумму значений переменной цикла. Фрагмент программы с оператором цикла запишется в виде:

For i: =1 to 10 do s:=s+i;

Writeln(‘s=’, s);

В примере 1 рассматривается простой оператор цикла.

Счётный оператор цикл FOR может иметь такую структуру:

б) FOR i:= b DOWNTO a DO <оператор>;

Замена зарезервированного слова TO на DOWNTO означает, что шаг изменения переменной цикла равен (-1).

Пример 2.

Найти сумму значений переменной цикла.

Фрагмент программы с оператором цикла запишется в виде:

For i: =10 to 1 downto s:=s+i;

Writeln(‘s=’,s:8:3);

{Результат получится тот же, что и в примере 1}.

При работе с оператором FOR следует соблюдать ряд правил.

Правила оператора FOR.

Нельзя войти в цикл, минуя оператор FOR. Нельзя изменять параметры цикла (a, b) внутри цикла. Параметры цикла и переменная цикла должны быть целыми. Шаг цикла может быть единица или минус единица. Естественное окончание цикла осуществляется при условии i > b. Из цикла можно выйти до естественного окончания цикла по условию.

2.2. Оператор цикла WHILE с предусловием

Структура оператора имеет вид:

WHILE <условие> DO <оператор>;

Здесь WHILE, DO – зарезервированные слова:

WHILE –пока; DO – выполнить,

<условие> – выражение логического типа;

<оператор> – произвольный оператор Турбо Паскаля.

Если выражение <условие> имеет значение TRUE, то выполняется <оператор>, после чего вычисление выражения <условие> и его проверка повторяются. Если <условие> имеет значение FALSE, оператор WHILE прекращает свою работу.

Пример 3.

Переписать фрагмент примера 1, используя оператор цикла с предусловием.

Фрагмент программы с оператором цикла запишется в виде:

s:=0; i:=1;

while i<=10 do

Begin

s:=s+i;

i:=i+1;

End;

Writeln(‘s=’,s);

В примере 3 рассматривается составной оператор цикла, тело цикла заключено в операторные скобки. Оператор цикла начинается со строки while i<=10 do, которая читается «пока выполняется условие i<=10 делать …». После чего начинается словом Begin выполнение операторов внутри цикла до слова End;

2.3. Оператор цикла REPEAT…UNTIL с постусловием

Структура оператора имеет вид:

REPEAT <тело_цикла> UNTIL <условие>;

Здесь REPEAT, UNTIL – зарезервированные слова (REPEAT –повторять, UNTIL не переводится, <условие> - условие выхода из цикла);

<тело_цикла> – произвольная последовательность операторов Турбо Паскаля; <условие> – выражение логического типа.

Операторы, входящие в <тело_цикла>, выполняются хотя бы один раз, после чего вычисляется выражение <условие>: если его значение есть FALSE, операторы <тело_цикла> повторяются, в противном случае оператор REPEAT…UNTIL завершает свою работу.

Пример 4.

Выполнить задание примера 3.

Фрагмент программы с оператором цикла запишется в виде:

s:=0; i:=1;

repeat

s:=s+i;

i:=i+1;

Until i>10;

Writeln(‘s=’,s); В примере 4 цикл выполняется пока переменная i £ 10, при i>10 цикл закончится.

3. Примеры выполнения задания к практическому занятию № 5

При записи циклического алгоритма на языке программирования можно выбрать любой из трёх операторов цикла. Если известно количество циклов, то предпочтительно выбрать оператора цикла с параметрами, в котором указывается начальное и конечное значения счётчика циклов.

Пример 5.

Написать программу примера 4 из практической работы № 2 (блок-схема 2.2 ).

В цикле вычислить значение функции z= x* y при условии, что одна из переменных - x меняется в каждом цикле, а другая переменная - у не меняется и может быть любым целым числом.

PROGRAM PR5;

Var

x, y, z, i, n :integer;

begin

{циклический алгоритм}

writeln (‘ввести x, y, количество циклов-n’);

readln (x, y,n);

{оператор цикла с параметрами}

for i:=1 to n do

begin

z:=x*y;

writeln (‘x= ’, x, ‘ y= ’, y, ‘ z= ’, z);

x:=x+1;

End; {конец оператора цикла с параметрами}

End.

Если неизвестно количество циклов, то следует выбрать любой из двух операторов цикла: с предусловием или с постусловием.

Пример 6.

Написать программу примера 2 из практической работы № 2, в котором заданы начальные значения переменных: x=1; y=5 и условие: пока y>x выполняется y: = y – x.

Определить количество циклов и значения переменных: x; y после выхода из цикла.

Алгоритм этой задачи представлен в виде блок-схемы 2.1. и программы:

PROGRAM PR6;

Var

k, x, y: integer;

begin

{циклический алгоритм}

x:=1; y:=5; k:=0;

{оператор цикла с предусловием}

while y>x do

begin

y: = y – x;

k:=k+1;

writeln (‘k=’, k, ‘ x= ’, x, ‘ y= ’, y);

end; {конец оператора}

end.

В примере 6 используется оператор цикла с предусловием, который работает при условии y>x. Условие проверяется при входе в цикл. В теле цикла счётчик цикла задан в виде оператора присваивания k:=k+1; который выдаёт количество выполненных циклов.

Пример 7.

Этот же алгоритм рассматривается в примере 7, где используется оператор цикла с постусловием. Цикл выполняется при условии y>x, но в конце оператора проверяется условие выхода из цикла (y<=x).

PROGRAM PR7;

Var

k, x, y: integer;

begin

{циклический алгоритм}

x:=1; y:=5; k:=0;

{оператор цикла с постусловием}

repeat

y: = y – x;

k:=k+1;

writeln (‘k=’, k, ‘ x= ’, x, ‘ y= ’, y);

until y<=x; {конец оператора}

end.

Пример 8.

Написать программу. Вычислить и вывести таблицу значений функции y=cos(x). Переменная X изменяется в интервале от x1 до xk с шагом dx.

В данной программе используется оператор цикла с параметрами.

PROGRAM PR8;

Var

x, y,dx, x1,xk:real;

i, n :integer;

begin

{циклический алгоритм}

writeln (‘ввести начальное – x1, конечное – xk, шаг – dx’);

read (x1,xk, dx);

n:=trunc((xk-x1)/dx+1);

x:=x1;

{оператор цикла с параметрами}

for i:=1 to n do

begin

y:=cos(x);

Writeln (‘x= ’, x:8:5, ‘ y= ’, y:8:5);

x:=x+dx;

End; {конец оператора цикла с параметрами}

End.

4. Задания к практическому занятию № 5

Написать программу по примеру 5 для своего циклического алгоритма, выполненного в практической работе №2. Ввести программу в компьютер, сохранить в файл. Запустить программу, исправить ошибки, ввести данные, получить результат. Представить преподавателю программу с полученным результатом на компьютере. Оформить и защитить работу преподавателю (тест по данной теме).

Задание ИДЗ №3 по теме: «Программирование. Циклы» в Приложении №1 (Задание 5).

5. Вопросы для самоконтроля к практическому занятию № 5. Тема «Программирование. Циклы»

1. Дан оператор на паскале: FOR k:=1 TO m DO S:=S+k;

Всего циклов будет выполнено:

1) k; 2) 1; 3) m; 4) s.

2. Дан оператор на паскале: FOR k:=1 TO m DO s:=s+k;

Выберите условие выхода из цикла:

1) k=1; 2) k=m; 3) k>m; 4) k<m.

3. Дан фрагмент на паскале, в котором цикл закончится при условии:

k:=1; s:=0;

while k<=m do

begin

s:=s+k;

k:=k+1;

end;

1) k>m; 2) k=m; 3) k<m; 4) k<=m.

4. Дан фрагмент на паскале, в котором цикл закончится при условии:

k:=1;

repeat

s:=s+k;

k:=k+1;

until k>m;

1) k>m; 2) k=m; 3) k<m; 4) k=s.

5. Дан оператор на паскале FOR k:=m TO n DO s:=s+k

Счетчиком цикла является переменная:

1) m; 2) n; 3) k; 4) s.

6. Дан фрагмент на паскале:

k:=1; s:=0;

while k<=m do

begin

s:=s+k;

k:=k+1;

end;

в котором цикл выполняется при условии:

1) k<=m; 2) k=m; 3) k<m; 4) k>m.

7. Дан оператор на паскале: FOR k:=3 TO m DO S:=S+k;

Для выполнения циклов значение m должно быть:

1) m<k; 2) m= s; 3) m>=k; 4) m<=k.

8. Дан оператор на паскале: FOR k:=3 TO m DO S:=S+k;

Значение шага изменения переменной k будет:

1) любым; 2) шаг=3; 3) шаг=1; 4) шаг= k;

9. Определите правильный ответ

Дан фрагмент на паскале:

k:=3; s:=0;

while k>=1 do

begin

s:=s+k;

k:=k-1;

end;

Writeln(‘s=’, s);

Результат выполнения цикла:

1) s=6; 2) s=5; 3) s=3; 4) s=0.

10. Дан фрагмент на паскале:

x:=5; z:=0;

repeat

z:=z+x;

x:=x - 1;

until x>3;

writeln(z);

Результат выполнения цикла:

1) z=0; 2) z=5; 3) z=9; 4) z=12.

Практическое занятие №6. Языки программирования высокого уровня

1. Цель занятия

Цель занятия – познакомиться с языками программирования, знать их классификацию. Уметь анализировать возможности и особенности рассматриваемых языков программирования, делать выводы об общих и отличительных характеристиках языков высокого уровня.

2. Теоретический материал для практического занятия №6

2.1. Общая классификация языков программирования

Управление компьютером осуществляется по конкретному алгоритму, который указывает последовательность действий для решения задачи. Для того, чтобы этот алгоритм был понятен компьютеру, служат языки программирования.

Язык программирования - это формализованный язык для описания алгоритма решения задачи на компьютере. Алгоритм записывается на языке программирования, вводится в компьютер и сохраняется в файле, который выполняется при его запуске.

В таблице 6.1 приводится классификация языков программирования, которая построена на основе различных источников информации и имеет обзорный характер. В качестве признака классификации языков программирования в таблице 6.1 взят синтаксис (определённые правила записи) образования его конструкций.

Таблица 6.1

Языки программирования

Низкого уровня (машинно-зависимые)

Высокого уровня (машинно-независимые)

Процедурные (директивные)

Непроцедурные

Операционные

Структурно-ориентированные

Объектно-ориентированные

Проблемно-ориентированные

1

Машинные языки

Бейсик

Ада

Object Pascal

LISP (Лисп) – декларативный язык обработки списков, символьной информации

2

Ассемблеры

Фортран

ALGOL

C++

Prolog (Пролог) – декларативный язык логического программирования

3

Макроассемблеры

Фокал

ПЛ/1

Паскаль

Java

Языки описания сценариев: Perl, Python, Rexx, Tcl, JavaScript

4

Си

Visual Basic Delphi

Снобол

Примечание

Из за большого объема этот материал размещен на нескольких страницах:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21