Практична робота

На початку уроку слід нагадати учням правила поведінки в комп 'ю-терному класі під час роботи з комп 'ютером. Повторити поняття величини, типи величин, поняття команди присвоєння, правила оформлення виразів та пріоритет виконання операцій мовою Паскаль.

Розв'язати такі приклади (повторення):

Ø Якщо значення цілочисельних змінних таке: Х= 15, Y=25, Z=8, то чому дорівнюватимуть значення цих змінних після виконання операційприсвоювання:

X := sqrt(Y)*2; Y := Y-2; Z := Y div 2 mod 3;

Очікувана відповідь:

X: = sqrt(25)*2присвоєння не може бути виконаним, оскількизначення квадратного кореня — дійсне число, а X— ціле число

Y:= 25-2 Y = 23

Z:= 23 div 2 mod 3 Z = 2

Ø Написати команду присвоєння, що надає значення середнього арифметичного змінних Xта Yзмінній Z(тип змінних дійсний).

Очікувана відповідь:

Z := (X + Y) / 2

Ø За допомогою яких операторів присвоєння можна поміняти місцямизначення двох змінних Х та Y.

Очікувана відповідь:

Для цього необхідне використання третьої змінної того ж типу, що й змінні X та Y, наприклад,

Z: Z := X; X := Y; Y := Z

Ø Далі можна розв'язати задачі з запропонованого підручника насторінках 55—58 (наприклад, 41, 50, 51, 58,62, 66,73,76,77).

Приклади розв'язування задач:

ЗАДАЧА № 41

Умова задачі: Якщо на одну шальку терезів посадити Даринку, яка важить п кг, і Наталку, яка важить на 5 кг менше, а на іншу насипати m кг цукерок, то скільки кілограмів цукерок доведеться з'їсти дівчаткам, щоб шальки терезів зрівноважилися?

Введемо змінні для зберігання результатів: N— вага Даринки; М— вага цукерок; Р—вага цукерок, які необхідно з'їсти дівчаткам.

Тоді програма для розв'язання задачі буде такою:

Program Task_41;

Uses crt;

Var M, N, P : real;

Begin

Clrscr;

Write('Введіть вагу Даринки');

Readln(N);

Write('Введіть вагу цукерок, що лежать на терезах');

Readln(M);

Р := N + N - 5 - М; {N - 5 - вага Наталки}

Writeln('Дівчаткам необхідно з'їсти ',Р,'кг цукерок.');

Readln;{Процедура затримує зображення на ехрані до натискання клавіші Enter)

End.

ЗАДАЧА №73

Умова задачі: Визначити, яку платню одержить на фірмі сумісник за виконану роботу, якщо йому нараховано 5 грн., а податок становить 20%.

Необхідні змінні: S—сума нарахувань сумісника; Р—реальна платня, яку він одержить у касі (за умовою вона становить 80 % від нарахувань).

Програма має наступний вигляд:

Program Task_73;

Uses crt; Var P,S : real;

Begin

Clrscr;

Write('Введіть суму нарахувань робітника');

Readln(S); P := S*0.8;

Writeln('Платня сумісника становить:', Р:8:2);

Readkey;

End.

Домашнє завдання:

• Повторити теоретичний матеріал за попередні уроки;

• За підручником Т.Караванової «750 задач з алгоритмізації та програмування» виконати задачі № 42,52, 59, 63, 74,75,78.