Блок-схема алгоритма

 
 


3. Программа:

PROGRAM pr1;

USES CRT; {подключаем стандартный модуль CRT }

CONST K= 3.75;

VAR a, b, c, x, t, p, s, y, z: real;

BEGIN CLRSCR; {процедура очистки экрана, входящяя в модуль CRT }

WRITE(‘ введите через пробел значения a, b, c, x ‘);

READLN(a, b, c, x); { ввод исходных данных с предварительным

сообщением}

t: = a+b; {оператор присваивания }

p: = c*x; {оператор присваивания }

y: = (t*t*t-sin(p))/(a-k);

z: = ln(p) – exp(1/3*ln((t+k)/a));

s: = y+z;

WRITELN(‘s = ‘, s:8:3); {вывод s в поле из 8 позиции с 3 цифрами

после точки}

READLN; {задержка}

END.

Прокомментируем рассмотренный пример. Все предложения в программе разделяются “; “. Комментарии в { } могут стоять в любом месте программы, как и пробелы.

Контрольные вопросы для самопроверки

1. Какие записи не являются числами в стандарте языка Паскаль:

3,756; -1.5*10; 35000; 0.00078; 6,75Е-10; 0.98Е2; 99.675Е-1.5?

2. Какие из перечисленных записей могут быть именами (идентификаторами):

А123В, cosinusотх, x12.A5, 7KOT, A_B, FOR, MATR-A?

3. Определите тип следующих констант:

K=137.35;

ZOR=’+’;

P=1000;

4. Какие из перечисленных записей могут быть метками:

A123, 37B, 10, XYZ, 999, 1, END, OP_BBODA?

5. Чему равно значение выражений и какого они типа?

FRAC(3.75) TRUNC(123.9756) ABS(-5)
SQR(2) 25 mod 4 3E2 * SQR(2)
SQRT(1.44) 4*4/2*3 3 div 3
5 div 2 24/2/6 FRAC(4)
(х >0) and (x<0) round(2.35)>1 3< >5

Порядок выполнения работы

1. Прочитать и законспектировать теоретическую часть работы.

2. Ответить на контрольные вопросы.

3. Выполнить самостоятельную работу на запись формул по вариантам (задание на стр. 14).

4. Выполнить индивидуальное задание для своего варианта (стр 16):

· сделать математическую постановку,

· разработать блок-схему и написать программу,

· набрать и отладить программу, получив результаты.



Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: