Практична робота №8. Складання програм з розгалуженнями
- практичної роботи_8.docx docx
- робот8_2.docx docx
- робота.docx docx
Захист практичної роботи №8
В-1
- Поясніть значення службових (зарезервованих) слів та їх місце у структурі опису розгалуження: and, else, not.
- Випишіть окремо вирази, які записані правильно та з помилками :
If x<>y then x:=0;
If (x<9) and (y>3) then n:=2*n; else n:=3*n;
- Які значення будуть мати змінні х та у після виконання команди:
If x<y then x:= -x else y:= -y
Якщо х=4, у=4
Якщо х= -789, у=1
- Запишіть, яка задача розв`яжеться після виконання команд:
If a>b then a:=max else b:=max
- Знайдіть значення y після виконання команд
If x<=9 then y:= 0 else y:=1, якщо: x=12, x=0.
- Запишіть умову для знаходження у мовою програмування Delphi
, якщо х<4; х=2.
Захист практичної роботи №8
В-2
- Поясніть значення службових (зарезервованих) слів та їх місце у структурі опису розгалуження: If; Or; Then;
- Випишіть окремо вирази, які записані правильно та з помилками :
If 6 then a:=2*a
If c<d then c:=-c else d:=-d
- Які значення будуть мати змінні х та у після виконання команди:
If x<y then x:= -x else y:= -y
Якщо х=9, у=0,1
Якщо х= -0,6, у=10,1
- Запишіть, яка задача розв`яжеться після виконання команд:
If a>b then b:=min else a:=min
- Знайдіть значення y після виконання команд
If x<=9 then y:= 0 else y:=1, якщо: x=10, x=1
- Запишіть умову для знаходження у мовою програмування Delphi
, якщо х
; х=4
Практична робота №8.2 Складання програм з розгалуженнями
Створіть проект знаходження значення рейтингової кількості балів учня. Алгоритм нарахування:
Критерії рейтингу:
- член шкільного парламенту +10 балів;
- всі оцінки високого рівня +10 балів;
- високого і достатнього +5 балів;
- призер предметних олімпіад +10 балів;
- переможець спортивних змаганнях +10 балів;
- відвідує гуртки та секції +5 балів.
Інструктивна картка:
- Відкрийте середовище Turbo Delphi 2007 і створіть новий проект;
- Розмістіть на формі елементи керування за зразком:
- Створіть обробник подій OnClick для кнопки Button1, що знаходить рейтинговий бал учня в окремому вікні;
- Повідомлення про рейтинг виводиться у окремому вікні. Наприклад:
Петров Іван. Рейтенговий бал – 43
- Протестуйте проект, знайшовши свій рейтинговий бал.
Практична робота №8.2 Складання програм з розгалуженнями
Створіть проект знаходження значення рейтингової кількості балів учня. Алгоритм нарахування:
Критерії рейтингу:
- член шкільного парламенту +10 балів;
- всі оцінки високого рівня +10 балів;
- високого і достатнього +5 балів;
- призер предметних олімпіад +10 балів;
- переможець спортивних змаганнях +10 балів;
- відвідує гуртки та секції +5 балів.
Інструктивна картка:
- Відкрийте середовище Turbo Delphi 2007 і створіть новий проект;
- Розмістіть на формі елементи керування за зразком:
- Створіть обробник подій OnClick для кнопки Button1, що знаходить рейтинговий бал учня в окремому вікні;
- Повідомлення про рейтинг виводиться у окремому вікні. Наприклад:
Петров Іван. Рейтенговий бал – 43
- Протестуйте проект, знайшовши свій рейтинговий бал.
Практична робота №8. Складання програм з розгалуженнями
- Відкрийте середовище розробки Turbo Delphi 2006 і створіть новий проект.
- Розмістіть на формі елементи керування для розв’язування задачі:
Відомі довжини сторін двох прямокутників. Обчислити площі прямокутників і порівняти їх. Визначити, чи є прямокутники квадратами. З’ясувати, чи вміститься один прямокутник у середину другого. Повідомити отримані результати.
У проекті:
- складіть обробник події OnClick першої кнопки для обчислення площ прямокутників і виведення повідомлення про те, у якого прямокутника
площа більша;
- складіть обробник події OnClick другої кнопки, виконання якого залежно від установлених прапорців приведе до визначення того, чи є відповідний прямокутник квадратом;
- складіть обробник події OnClick третьої кнопки, виконання якого приведе до визначення, чи вміститься перший прямокутник усередину другого або другий прямокутник усередину першого залежно від вибраного перемикача;
- Перевірте правильність виконана програми.
Практична робота №8. Складання програм з розгалуженнями
- Відкрийте середовище розробки Turbo Delphi 2006 і створіть новий проект.
- Розмістіть на формі елементи керування для розв’язування задачі:
Відомі довжини сторін двох прямокутників. Обчислити площі прямокутників і порівняти їх. Визначити, чи є прямокутники квадратами. З’ясувати, чи вміститься один прямокутник у середину другого. Повідомити отримані результати.
У проекті:
- складіть обробник події OnClick першої кнопки для обчислення площ прямокутників і виведення повідомлення про те, у якого прямокутника
площа більша;
- складіть обробник події OnClick другої кнопки, виконання якого залежно від установлених прапорців приведе до визначення того, чи є відповідний прямокутник квадратом;
- складіть обробник події OnClick третьої кнопки, виконання якого приведе до визначення, чи вміститься перший прямокутник усередину другого або другий прямокутник усередину першого залежно від вибраного перемикача;
- Перевірте правильність виконана програми.
про публікацію авторської розробки
Додати розробку