3. Створіть проєкт, у якому в результаті настання події MouseMove для напи- су буде встановлено: • Новий текст на ньому, червоний колір тексту і збільшиться відступ напи- су від верхньої межі вікна на 20 пікселів; • Новий текст на ньому, червоний колір тексту і збільшиться ширина напи- су на 5 символів. Збережіть проєкт у папці з іменем Завдання 6.4.3, створеній у вашій папці. TO Попії Click Пла напас буде

3:

var a,b,c,d,e,f,g:real;

begin

   write('Введите сумму наличных средств (руб): '); readln(a);

   write('Введите стоимость 1 кг конфет (руб): '); readln(b);

   write('Введите массу конфет (кг): '); readln(c);

   write('Введите стоимость 1 кг яблок (руб): '); readln(d);

   write('Введите массу яблок (кг): '); readln(e);

   f := b*c + d*e;

   g := a - f;

   writeln('Стоимость покупки составит ', f:0:2, ' руб.');

   writeln('Сдача ', g:0:2, ' руб.');

end.

4:

var a:real;

begin

   write('Введите длину куба: '); readln(a);

   writeln('Объём куба = ', a*a*a:0:2);

   writeln('Площадь поверхности куба =  ', 6*a*a:0:2);

end.

1. Берілген нүктелер арқылы өтетін түзудің теңдеуін жазыңыз: А(2;1) В(-1;2). [2 ұпай]

2. Шеңбердің берілген теңдеуі бойынша оның центрінің координаталары мен радиусын табыңыз: (х-4)2 +(у+8)2 =36 [1 ұпай]

3. нүктелері берілген.

a) төбелерінің координаталары бойынша салыңыз; [1 ұпай]

b) қабырғаларының ұзындықтарын табыңыз; [3 ұпай]

c) түрін анықтаңыз (теңқабырғалы, теңбүйірлі, тікбұрышты); [2 ұпай]

d) берілген үшбұрыштың ауданын есептеңіз. [2 ұпай]

4. Төбелері А (1;-1) В (0;1) С (4;3) және Д (5;1) нүктелері болатын төртбұрыштың тіктөртбұрыш болатынын дәлелдеп, оның ауданын табыңыз. Ол үшін:

a) төбелерінің координаталары бойынша сызбасын салыңыз; [1 ұпай]

b) қабырғаларының ұзындықтарын табыңыз; [4 ұпай]

c) диагональдарын анықтап, дәлелдеңіз; [2 ұпай]

d) тіктөртбұрыштың ауданын есептеңіз. [2 ұпай]

Объяснение