Доброго дня!
Записуємо у робочих зошитах:
27 січня
Найбільший і найменший елементи масиву
Навчаємось за таким планом:
І. Теоретичний блок
Записуємо у робочих зошитах:
Задача
У полі Memo міститься зріст 10 учнів 9 класу. Визначити зріст найвищого (найнижчого) учня.
Позначимо:
max – зріст найвищого;
min – зріст найнижчого.
Описуємо змінні:
var a:array[0..9] of real; i:integer;
max,min:real;
Визначаємо max:
max:=a[0];
for i:=0 to 9 do a[i]:=strtofloat(memo1.Lines[i]);
for i:=0 to 9 do if a[i]>max then max:=a[i];
Виводимо результат:
label2.Caption:='Найвищий учень має зріст '+floattostr(max)+' м';
Самостійно створити код та вивести зріст найнижчого учня (min).
ІІ. Практичний блок
Зразок форми:
Зразок кінцевого проекту:
Виконаєте практично дане завдання, коли прийдете у школу!!!
ІІІ. Завдання додому (записати у щоденники):
Опрацювати § 6.2 (стор.167-168); підготуватися до практичної роботи №9 (стор.174)
Зауваження. Створений конспект відправте, будь ласка, мені в особисті повідомлення.
До побачення!
