Відповіді до підручника Інформатика 8 клас Морзе Н.В - Морзе Н.В 2016-2020

Розділ 6. Алгоритми роботи з об'єктами та величинами
20. Величини, їх типи та властивості

Обговорюємо

1. У повсякденному житті ми щодня використовуємо різні величини: для позначення відстані від школи до будинку, визначення температури повітря, площі земельної ділянки, висоти будівлі, швидкості пішохода або авто, часу, витраченого на дорогу зі школи. Кожна величина вирізняється певним значенням та характеризується певними одиницями, у яких вона вимірюється.

2. Константам присвоюють значення в описовій частині програми і в процесі виконання програми вони незмінні. Для опису констант мовою Free Pascal використовують службове слово const, у мові програмування Python константи задають у тексті програми. Імена змінних та їх типи вказують у середовищі Lazarus після ключового слова var, у мові Pythonзмінні можна створювати будь-де у коді програми, але для зручності стильового оформлення змінні оголошують в одному місці, їм надаються початкові значення.

3. Для посилання на величину у виразах під час створення програм використовують імена величин. Позначення імен називають ідентифікаторами. їх добирають у вигляді деякого скінченного впорядкованого набору літер і цифр, який починають з літери або символу підкреслення. Наприклад, var a: real; b, с: integer; — описано змінну а дійсного типу, а змінні Ь, с — цілого типу.

4. Для опису числових величин мовою Free Pascal використовують службові слова: byte, integer, smallint (цілі числа різного діапазону), real (дійсне число), а мовою Python — числові величини задаються двома типами: int — довільне ціле число, float — дійсне число.

5. У середовищі Lazarus для опису сталих величин, які будуть використовуватись у програмі, використовують службове слово const.

6. У середовищі Lazarus змінна має бути обов’язково описана у відповідному місці програми. Для цього після заголовка процедури перед тілом процедури, яке обмежується службовими словами begin й end, розміщують розділ оголошення змінних, що починається службовим словом var: var ім’я_змінної: тип_змінної; якщо описуються кілька змінних одного типу, то імена змінних записуються через кому: var ім’я_змінної_1, ім’я_змінної_2, ім’я_змінної_р: тип_змінних; якщо описано різні типи змінних, то службове слово записують один раз, а перелік змінних кожного типу — в новому рядку.

7. Для введення даних користувачем у програмі мовою Python використовують функцію input {}. Для цього потрібно записати команду присвоєння значення цієї функції змінній відповідного типу. За замовчуванням введена величина буде рядкового типу, щоб перетворити її в цілочисельний тип, використовують функцію int, у дійсний — float.

8. Над числовими величинами можна виконувати арифметичні операції: додавання (+), віднімання (-), ділення (/); операції ділення націло (div — для Free Pascal, // — для Python), остача від ділення (mod — для Free Pascal, % — для Python) для даних цілого типу.

9. При розв’язування задач з математики використовували функції abs(.r), sin(x), cos(x), pi, sqr(x), sqrt(x).

Працюємо в парах

1. Byte — 5; 30; Integer — 500; 9058; Smallint — 976; 186; Real — 11.3; 56.0; Int — I 12456; Float —25,7+e8; 0.999999.

Працюємо самостійно

1. a) r=4;

kr=іnt(іnput('введіть кількість рядів'));

k=r*kr;

print (k);

б)  r=4;

kr=іnt(іnput ('введіть кількість рядів'));

k=r*kr+2;

print (к);

в)  r1=4;

г2=5;

kr1 =int(input'введіть кількість рядів1 класу'));

kr=іnt(іnput('введіть кількість рядів'2 клас/));

k=rl *krl+ r2*kr2+2;

print (к);

2.  pl=0.18;

sl=int(input('введіть суму'));

s=srl *0.18*100;

print (s);

3. 1) г1= іnt(іnput ('введіть r1'));

г2= іnt(іnput('введіть r2'));

г3= іnt(іnput ('введіть r3');

г4= іnt(іnput ('введіть r4'));

г=г1+г2+г3+г4;

print (r)

Аналогічно виконати для паралельного з’єднання:

2)  г1= іnt(іnput('введіть r1*));

г2=іпІ(іпрШ('введіть г2'));

г3= іnt(іnput ('введіть гЗ');

г4= іnt(іnput ('введіть г4'));

г=1/г1+1/г2+1/г3+1/г4;

print (г);

У властивостях видалити в полі Text текст за замовчуванням (аналогічно зробити ще три поля: опір електричного кола) підвести вказівник до зображення напису (TLabel) на панелі інструментів на вкладці Standard два рази натиснути лівою клавішею миші у властивостях кнопки в полі Caption змінити текст за замовчуванням підвести вказівник до зображення кнопки на панелі інструментів на вкладці Standard два рази натиснути лівою клавішею миші у властивостях кнопки в полі Caption змінити текст на Отримати відповідь обираємо в меню Інспектор об’єктів вкладку Події знаходимо поле OnClick та два рази натискаємо лівою клавішею миші у поле праворуч від Інспектора об’єктів у вказаній курсором місці записуємо процедури, які мають команди:

1) var r1, г2, г3, г4, r: real;

begin

r1:=StrToFloat(Editl.Text);

r2:=StrToFloat(Edit2.Text);

r3:=StrToFloat(Edit3.Text);

r4:=StrToFloat(Edit4.Text);

r:=r1+r2+r3+r4;

Label1.Caption:=FloatToStr(r);

end;

2) Аналогічно виконати для паралельного з’єднання

var rl, г2, г3, r4, r: real;

begin

r1:=StrToFloat(Edit1.Text);

r2:=StrToFloat(Edit2.Text);

r3:=StrToFloat(Edit3.Text);

r4:=StrToFloat(Edit4.Text);

r:=1 /r 1+1 /r2+1 /r3+1 /r4;

Label1.Caption:=FloatToStr(r);    ’

end;

4. У вкладці Проект обрати Створити проект змінити значення властивостей Forml: Caption — Залишок; Height — 200, Width — 200; Color — cllnactiveCaption підвести вказівник миші до зображення напису (TLabel) на панелі інструментів на вкладці Standard два рази натиснути лівою клавішею миші у властивостях кнопки в полі Caption змінити текст за замовчуванням підвести вказівник до зображення кнопки на панелі інструментів на вкладці Standard два рази натиснути лівою клавішею миші у властивостях кнопки в полі Caption змінити текст на Обчислити залишок тканини, властивість Font змінити за власним бажанням обираємо в меню Інспектор об’єктів вкладку Події знаходимо поле OnClick та два рази натискаємо лівою клавішею миші у поле праворуч від Інспектора об’єктів у вказаній курсором місці записуємо процедури, які мають команди:

var a, R, S: real;

begin

a:=StrToInt(InputBox('Сторонa квадрата’, ’Введіть сторону квадрата:',")); R:=StrTolnt(InputBox('Paдіуc кола’, ’Введіть радіус кола:', "));

S:=sqr(a)-рі*sqr(R);

Label1.Caption:=FloatToStr(S);

end;

5. У меню File обрати команду New Project у діалоговому вікні вікні Create Project, що відкрилося обрати папку збереження проекту та задати ім’я проекту «Обчислення» натиснути кнопку Create у меню File обрати команду New у списку New File, що відкрився вибрати Python File натиснути кнопку ОК у вікні редактора коду ввести текст програми:

1) from math import fabs

х= int(input ('введіть x'))

у= int(input ('введіть у'))

z=(fabs(x)+ fabs(y))/( 1 +fabs(x*(y))

print (z)

2)from math import fabs

х= int(input ('введіть x'))

у= int(input ('введпь y'))

z=1 +(fabs(y-x)+(((y-x)**2)/2)+(((y-x) * *3 )/3

print (z)

3) from math import fabs

x=int(input('введіть x'))

y=int(input(введіть y'))

z=2*y/cos(x-pi/6)

print (z)

4)from math import fabs

х= int(input ('введіть x'))

у= int(input ('введіть у'))

z=x/( 1 +(x*2/3+((2 *x)* *2))))

print (z)

6. У вкладці Проект обрати Створити проект змінити значення властивостей Forml: Caption — Домашня бухгалтерія; Height — 400, Width — 300; Color — clMoneyGreen підвести вказівник миші до зображення напису (TLabel) на панелі інструментів на вкладці Standard два рази натиснути лівою клавішею миші у властивостях кнопки в полі Caption змінити текст за замовчуванням => підвести вказівник до зображення кнопки на панелі інструментів на вкладці Standard два рази натиснути лівою клавішею миші у властивостях кнопки в полі Caption змінити текст на Обчислити залишок тканини, властивість Font змінити за власним бажанням обираємо в меню Інспектор об’єктів вкладку Події знаходимо поле OnClick та два рази натискаємо лівою клавішею миші у поле праворуч від Інспектора об’єктів у вказаній курсором місці записуємо процедури, які мають команди:

var dl, d2, d3, vl, v2, v3, v4, v5, v: real;

begin

d1:=StrToInt(InputBox(’Дохід мами, ’Введіть дохід мами', "));

d2:= StrToInt(InputBox(’Дохід тата, ’Введіть дохід тата', "));

d3:=StrToInt(InputBox('Дохід брата, ’Введіть дохід брата', ")); v1:=StrToInt(InputBox('Koмунальні послуги, 'Введіть витрати на комунальні послуги',"));

v2:=StrToInt(InputBox('Tpaнспорт, 'Введіть витрати на транспорт', ")); v3:=StrToInt(InputBox('Xaрчування, 'Введіть витрати на харчування', ")); v4:=StrToInt(InputBox('3в’язок, 'Введіть витрати на зв’язок,', ")); v5:=StrToInt(InputBox('lншi витрати, 'Введіть загальні витрати на інші послуги', '0'));

v:=(d1+d2+d3)-(vl+v2+v3+v4+v5);

Label1.Caption:=FloatToStr(v);

end;