|
ВАРІАНТИ ЗАВДАНЬ ДО ПРАКТИЧНОЇ №2
Практична робота №3. ТЕМА: Обчислення виразів. Використання стандартних функцій. I.МЕТА РОБОТИ. 1.Вивчення порядку дій при обчисленні виразів. 2.Одержання навиків в записі виразів на мові ПАСКАЛЬ і використанні стандартних функцій. II.ПОСТАНОВКА ЗАДАЧІ. 1.Знайти значення функції Y(X) при заданому X. Використовувати стандартні функції. Обрахувати Y11=[Y], де [ ] означають цілу частину числа; Y22=[Y+0.5]-заокруглення. 2. Записати вираз, який залежить від координат точки X1 і Y1 і приймає значення TRUE, якщо точка належить заданній області, і FALSE, якщо не належить,скласти програму, результат видати на екран. III.ЗМІСТ ЗВІТУ. 1. Постановка задачі для конкретного варіанту. 2. Текст програми. 3. Результати обчислень. 4. Висновок. IV.МЕТОДИЧНІ ВКАЗІВКИ. 1. Функції, які відсутні в списку стандартних функцій мови ПАСКАЛЬ, потрібно виразити через ті ,які маємо. 2. Виведення значення виразу в даній точці організувати, використовуючи оперетор WRITELN. 3.Приклад програми, яка обчислюе Y(X)=3-x+1 SIN(X) при заданому Х, друкує Y11, Y22 і перевіряє належність точки з координатами (X1,Y1) заданнiй області:першій четверті кола одиничного радіуса з центром в початку координат.
ПРИКЛАД ПРОГРАМИ. Вихідні дані: X=-1.5, X1=0.5, Y1=1.2.
PROGRAM TOB ; VAR X, X1, Y1, Y: REAL; BEGIN WRITELN (‘ВВЕДІТЬ Х: ’); READLN (X); Y:= EXP((-X+1)*LN(3))*SIN(X); WRITELN (‘ПРИ Х=‘ , Х:8:3, ’ Y=‘,Y:8:4); WRITELN (‘ Y11= ‘, TRUNC(Y):4, ’ Y22=‘ , ROUND(Y):4); WRITELN (‘ВВЕДІТЬ КООРДИНАТИ: X1, Y1’); READLN (X1, Y1); WRITELN ((X1>=0) AND ((Y1>=0) AND (SQR(X1)+SQR(Y1)<=1)); WRITELN (‘ ’ : 10, ’ПРОГРАМУ СКЛАВ ІВАНОВ’); END. ВАРІАНТИ ЗАВДАНЬ ДО ПРАКТИЧНОЇ РОБОТИ №3
ПРАКТИЧА РОБОТА №4 ТЕМА: Програмування розгалужуючих алгоритмiв. I.МЕТА РОБОТИ: Засвоєння розгалуженої структури програми. Одерження навиків в організації розгалужень на декiлька вiток процесу розв’язання задачi. 3. Одерження практичних навиків роботи в діалоговому режимі. II.ПОСТАНОВКА ЗАДАЧІ. Найти значення функції при різних варіантах аргументу. Використовувати стандартні функції , організувати ввод і вивід даних заданих типів, забезпечити друкування відповідних заголовків. Скласти програму для розв’язання задачі 1 та задачі 2, використовуючи оператор вибору CASE. III.ЗМІСТ ЗВІТУ. 1. Постановка задачі. 2. Текст прграми і результати її виконання. 3. Висновки. IV.МЕТОДИЧНІ ВКАЗІВКИ. 1. Функції, які відсутні в списку стандартних функцій мови ПАСКАЛЬ, потрібно виразити через ті які маємо. 2. Вивiд значення виразів в даній точці організувати, використовуючи оператор WRITELN. V.ПРИКЛАД ПРОГРАМИ. Обчислити значення функції S= для a=1.3 ,b=1.29 ,t=0.38 PROGRAM P1; VAR A,B,T,S:REAL; N:INTEGER; BEGIN WRITELN( ‘ М Е Н Ю П Р О Г Р А М И :’); WRITELN( ‘ 1 - ЗАДАЧА 1’); WRITELN( ‘ 2 - ЗАДАЧА 2’); WRITELN; WRITELN(’ВВЕДІТЬ НОМЕР ЗАДАЧІ N:’); READLN(N); CASE N OF 1: BEGIN WRITELN(’ВВЕДІТЬ А,В,Т’); READ(A,B,T); IF A*T<1 THEN S:=A*T+B; IF A*T=1 THEN S:=COS(A*T); IF A*T>1 THEN S:=EXP(-A*T)*COS(A*T); WRITELN(’A=’,A:8:3,’ B=’,B:8:3,’ T=’,T:8:3); WRITELN(’РЕЗУЛЬТАТ=’,S:8:3); END; 2:BEGIN WRITELN(‘ВВЕДІТЬ 2 ЦІЛИХ ЧИСЛА:’); READLN(X,Y); IF X mod 2 = 0 THEN WRITELN(X,’-парне число’); IF Y mod 2 = 0 THEN WRITELN(Y,’-парне число’); END; END.
Загрузка...
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|