Контрольні питання

1. Як записується і як працює оператор FOR?

2. Для організації яких циклів застосуємо оператор FOR?

3. У чому відмінність оператора WHILE від оператора REPEAT?

4. Як програмуються циклічні алгоритми з явно заданим числом повторень циклу?

5. Як програмуються циклічні алгоритми із заздалегідь невідомим числом повторень циклу?

6. Напишіть оператор циклу, що не виконується жодного разу.

7. Напишіть оператор циклу, що виконується необмежене число раз.

8. Заміните оператор "Repeat A Until B" рівносильним фрагментом програми з оператором While.

Завдання

Обчислення виражень: Дане натуральне n. Обчислити: 1. ; 2. ; Дане дійсне число х, натуральне число n. Обчислити: 3.x ( x - n )( x - 2 n )( x - 3 n )…(x-n2); 4... ; 5. ; Дане натуральне n. Вычиcлить: 6. ; 7./ ;

Обчислити приблизно значення нескінченної суми (праворуч від кожної суми дається її точне значення, з яким можна зрівняти отриману відповідь): 8. = ; 9. = ; 10./=/ ;

Потрібне наближення вважається отриманим, якщо обчислено сум-+\.ма декількох перших що складаються, і черговий доданок виявився по модулі менше даного позитивного числа e.

Задачки на кмітливість

1. Знайти всі двозначні числа, сума цифр яких не міняється при множенні числа на 2,3,4,5,6,7,8,9.

2. Знайти всі тризначні числа, сума цифр яких дорівнює даному цілому числу.

3. Знайти всі тризначні числа, середня цифра яких дорівнює сумі першої й другої цифр.

4. Знайти всі тризначні числа, які можна представити різницею між квадратом числа, утвореного першими двома цифрами й квадратом третьої цифри.

5. Знайти всі двозначні числа, сума квадратів цифр яких ділиться на 17.

6. Знайти всі тризначні числа, представимые у вигляді сум факторіалів своїх цифр.

7. Знайти двозначне число, що володіє тим властивістю, що куб суми його цифр дорівнює квадрату самого числа.

8. Знайти двозначне число, рівне потроєному добутку його цифр.

9. У яких двозначних числах подвоєна сума цифр дорівнює їхньому добутку?

10. Чи можна задане натуральне число М представити у вигляді суми квадратів двох натуральних чисел? Написати програму рішення цього завдання.

Завдання підвищеної складності

1. Визначити, чи є задане число зробленим , тобто рівним сумі всіх своїх (позитивних) дільників, крім самого цього числа (наприклад, число 6 зовсім: 6=1+2+3).

2. Дано натуральне k. Надрукувати k-ю цифру послідовності 1234567891011121314..., у якій виписані підряд всі натуральні числа.

3. Дано натуральне k. Надрукувати k-ю цифру послідовності 149162536..., у якій виписані підряд квадрати всіх натуральних чисел.

4. Дано натуральне k. Надрукувати k-ю цифру послідовності 1123581321..., у якій виписані підряд всі числа Фибоначчи.

5. Обчислити , багаторазово застосовуючи ітераційну формулу /. Початкове наближення вибрати самостійно. Припинити обчислення, якщо різниця двох послідовних ітерацій стане менше, ніж добуток останнього наближення на .

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

Програмування з використанням масивів

Теоретический материал

Справочник по процедурам и функциям

Ціль роботи: навчитися правильно описувати різні масиви, уміти инициализировать масиви, роздруковувати вміст масиву; навчиться вирішувати завдання на використання масивів.

Загальні відомості:

Масив - це структурований тип даних, що використовується для опису впорядкованої сукупності фіксованого числа елементів одного типу, що мають загальне ім'я. Для позначення елементів масиву використовуються ім'я змінної-масиву й індекс.

Перед виконанням роботи необхідно вивчити правила опису й використання змінних типу масив, типізованих констант типу масив.

Приклади:

Приклад1: Даний двовимірний масив. У кожному рядку всі його елементи, не рівні нулю, переписати (зберігаючи порядок) у початок рядка, а нульові елементи - у кінець масиву. Новий масив не заводити. Етапи рішення завдання: 1. Суть одного з алгоритмів рішення даного завдання полягає в тому щоб "переглядати" масив построчно й знаходити в кожному рядку пари (0:число), а потім міняти їх місцями між собою й так доти поки в рядку таких пар не виявиться. 2. Напишемо програму на псевдо паскале:

program example1;

var

V:array[1..100,1..100] of integer;

m,n, i,j, c: integer;

flag: boolean;

begin

<уведення розмірності масиву m*n>

<заповнення осередків масиву>

for i:=1 to m do

repeat

flag:= true;

for j:=1 to n-1 do

if (v[i,j]=0) and (v[i,j+1]<>0) then begin

<поміняти їх місцями>

flag:= false;

end;

until flag;

<Печатка масиву>

readln;

end.

3.Складемо блок схему алгоритму

Деталізуємо блок "Упорядковуємо 1-ю рядок"

Блок схема алгоритму цілком:

4.Приведемо програму мовою Паскаль:

program example1;

var

V:array[1..100,1..100] of integer;

m,n, i,j, c: integer;

flag: boolean;

begin

write('Уведіть розмірність масиву m-n> '); readln(m,n);

for i:= 1tomdo

forj:=1tondobegin

write('V[',i,',',j,']= '); readln(V[i,j]);

end;

for i:=1tomdo

repeat

flag:=true;

forj:=1 ton-1do

if(v[i,j]=0)and(v[i,j+1]<>0)thenbegin

c:=v[i,j];v[i,j]:=v[i,j+1];v[i,j+1]:=c;

flag:=false;

end;

untilflag;

fori:=1tomdobegin

forj:=1tondowrite(V[i,j]:2);

writeln

end;

readln;

end.