 |
В а р і а н т и з а в д а н ь.
|
|
|
|
1.z= 
2. z= 
3.z= 
4. z= 
5.z= 
6. z= 
7.z= 
8. z= 
. z= 
10. z= 
11. z= 
12. z= 
13. Якщо введене число А >0 та ділиться без залишку на 7 то., 
якщо воно ще й парне то 
, інакше видається повідомлення що число не ділиться на 7 або не є >0, або не ділиться на 7 та не є >0 одноразово.
14. Знайти мінімальне число з трьoх введених та роздрукувати його.
15. w=max2(max (xy;x+y);x2);
16. r=min(lg(x);sin(y);z2);
17. Знайти для наступних значень х=2,5; 2,75; 4,99; значення у, якщо початкова інформація задана таблицею
Х 0 2 4 6 8 10
У 0 1,35 5,16 10,0 17,4 36,5 та відомо що
де 
18. Задано довжини трьох сторін трикутника. Визначити, чи є трикутник прямокутним?
19. Обчислити площу трапеції з основами А та (А+х) і висотою (В-х) та прямокутника зі сторонами А та В. Площа якої фігури більша?
20. За допомогою функції random(x) ввести 2 числа. Вирахувати їх факторіали.
Який з них більший? Роздрукувати.
Лабораторна робота №3
Прості цикли
Цикл – це група оперцій, що виконується багаторазово. В мові Pascal є три оператори організації циклів: While, Repeat та For.
Для опису циклу використовується структура повторення і відповідні оператори циклу.
Оператор циклу з передумовою має вигляд:
While <логічний вираз> Do
Begin
оператор1; оператор2;...;
End;
Оператор циклу з післяумовою має вигляд:
Repeat
оператор1;оператор2;
Until логічний вираз;
Існує оператор циклу з параметром:
For <параметр циклу:= початкове значення> To <кінцеве значення> Do
Begin
оператор1; оператор2;...;
End;
Параметр циклу це змінна порядкового типу. При повторенні циклу параметр циклу змінються таким чином:
Параметр циклу:=Succ(параметр циклу);
Цикл закінчується, коли параметр циклу стане більшим за його кінцеве значення. Якщо кінцеве значення дорівнює початковому, то цикл виконається один раз. Якщо кінцеве значення недосяжне, то цикл не виконається зовсім. Якщо в тілі циклу необхідно виконати більше одного оператора, то їх треба оформити, як складений оператор Begin...End;
|
|
|
Цикл Repeat називається циклом з постумовою. Тіло такого циклу виконується завжди хоча б один раз.Тому, що умова стоїть в кінцевому операторі Until. Результат обчислення завжди логічна величина, якщо він False, цикл продовжується, а якщо True – перестає працювати.
Наприклад:
I:=0;
Repeat
I:=I+1;
………..
Until I=f;
Цикл завершиться, як тільки I=f;
Цикл While має умову на початку циклу. Якщо умова з самого початку False то цикл не виконається ні одного разу. Такий цикл зручно використовувати для змінення параметру з будь яким кроком.
Наприклад:
I:=0;
While I<=f do begin
Inc(i);
…………………….
End;
В а р і а н т и з а в д а н ь
1. Обчислити суму ряду:
2. S= x-x3/3!+x5/5!-x7/7!+…
3. S= x-x3/3+x5/5-x7/7+…
4. S=1/x+1/x2+1/x4+1/x8+1/x16…
5. S=x+x2/2!+x4/4!+x8/8!…
6. S= x-x2/2+x3/3-x4/4+x5/5-…
7. S= 
n коренів
8. Знайти таке n, для якого 1+1.2+1.4..+(1+n).n>= А, де А вводиться з клавіатури.
9. Скласти програму пошуку суми цифр числа, що вводиться з клавіатури.
10. Скласти програму пошуку такого цілого числа, що вводиться з клавіатури та співпадає з числом, що загадав комп'ютер.
11. S=x+x2/2!+x3/3!+x4/4!+x5/5!+…
12. S=(1/2)*(3/4)*(5/6)*…*((2n-1)/2n)
13. S=1*2+2*3*4+…+n*(n+1)*…* 2n
14. S=(1+1/12)*(1+1/22)*…*(1+1/n2)
15. S=(1/1)*(3/2)*(5/3)*(7/4)…(2n-1)/n)
16. S=(3+(6+…+(3n)1/2)1/2)1/2
17. Скласти програму обчислення найбільшого дільника чисел М та N, які генеруються лічильником випадкових чисел.
18. Скласти програму обчислення значень функції 
, для Х від[-3,1] з кроком 0.1.
19. Скласти програму обчислення значень функції 
, для Х від [0.5, 5] з кроком 0.25.
20. Обчислити 1-1/2+1/3-1/4+1/5-…+1/99-1/100 послідовно зліва направо та навпаки. Результати порівняти.
21. Знайти всі цілі результати обчислень за формулою (Х2-Х)/(Х+2), де Х змінюється від 1 до 100 кроком 2, полічити їх та вивести в формі таблиці.
|
|
|
|
|
|
