1. Запустіть середовище Lazarus. 2. Створіть проект для віднімання двох дійсних чисел.
3. Задайте формі розмір 400х400 та дайте їй назву “Віднімання”. Для цього змініть значення властивостей Height – 400, Width – 400, Caption –“Віднімання ” в Інспекторі об’єктів. Змініть колір форми на жовтий.
4. Розмістіть на формі такі компоненти: два компоненти Edit, три Label, одну кнопку Button. Розташуйте їх за зразком:
5. Змініть для вказаних компонентів такі значення властивостей
- Button1: властивість Caption — значення “Результат”;
- Label1: властивість Caption — значення “Різниця”;
- Label2: властивість Caption — значення “Зменшуване”;
- Label3: властивість Caption — значення “Від’ємник”;
6. Для кнопки необхідно створити відповідну процедури. Для цього двічі клацніть по кнопці Результат.
7. Запустіть проект на виконання.
Вікно виконання проекту віднімання двох дійсних чисел.
8. Зробіть скріншоти виконаного проекту в середовищі Lazarus, разом з вікном повідомлень. Окремо зробіть скріншот редактора тексту, створеної форми і вікна виконання проекту віднімання двох дійсних чисел. Вставте скріншоти в текстовий процесор Miсrosoft Word і збережіть під назвою завдання 1.
Завдання 2. ( ів)
1. Відкрийте вікно середовища Lazarus.
2. Відкрийте проект для визначення у скільки разів добуток двох заданих дійсних чисел більший за суму цих чисел.
Пояснення: спочатку потрібно видобути файли з архіву, а потім відкрити файл project1.lpi.
3. Створіть три тестових набори вхідних даних для тестування проекту. Створіть таблицю за зразком у текстовому процесорі Miсrosoft Word.
4. Обчисліть очікувані результати й запишіть їх. Протестуйте проект на ваших тестових даних, порівняйте отримані результати в проекті з вашими в таблиці. Проаналізуйте отримані дані і знайдіть помилку у коді програми, виправте її і протестуйте знову свої тестові дані, запишіть до таблиці. Зробіть скрішоти вікон до всій трьох тестуючи даних до та після виправлення помилки. Вставте скріншоти до текстового документу під таблицею.
4. Збережіть текстовий документ під назвою завдання 2.
Додайте текстові файли (завдання 1 та завдання 2) до архіву і прикріпіть до ДЗ. УВАГА! Домашні завдання виконуються українською мовою.
1. Чтобы решить задачу, надо определить, какое количество варенья съест Машенька за 20 дней. Вначале вычислим это количество в ложках, если известно, что за день она съедает по 5 ложек варенья:
5 * 20 = 100 ложек.
2. Теперь переведем 100 ложек варенья в граммы, если известно, что каждая ложка помещает 5 г варенья:
100 * 5 = 500 грамм.
3. Если исходное количество варенья составляет 650 грамм, тогда вычтем из этой массы ту часть, что съест Машенька за 20 дней и получим массу оставшегося варенья через 20 дней:
650 - 500 = 150 грамм.
ответ: получили, что через 20 дней в банке останется всего 150 грамм варенья.
1. Чтобы решить задачу, надо определить, какое количество варенья съест Машенька за 20 дней. Вначале вычислим это количество в ложках, если известно, что за день она съедает по 5 ложек варенья:
5 * 20 = 100 ложек.
2. Теперь переведем 100 ложек варенья в граммы, если известно, что каждая ложка помещает 5 г варенья:
100 * 5 = 500 грамм.
3. Если исходное количество варенья составляет 650 грамм, тогда вычтем из этой массы ту часть, что съест Машенька за 20 дней и получим массу оставшегося варенья через 20 дней:
650 - 500 = 150 грамм.
ответ: получили, что через 20 дней в банке останется всего 150 грамм варенья.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
#include<windows.h>
#include<iostream.h>
#include<stdlib.h>
#include<conio.h>
#include<stdio.h>
#include<string.h>
int main()
{
SetConsoleOutputCP(1251);
char text[1000],p,r[]=" ,._-!?\"';:()";
char T[][33] =
{
{'а','б','в','г','д','е','ё','ж','з','и','й','к','л','м','н','о','п','р','с','т','у','ф','х','ц','ч','ш','щ','ъ','ы','ь','э','ю','я'},
{'А','Б','В','Г','Д','Е','Ё','Ж','З','И','Й','К','Л','М','Н','О','П','Р','С','Т','У','Ф','Х','Ц','Ч','Ш','Щ','Ъ','Ы','Ь','Э','Ю','Я'}
};
int i,q,j;
char d,sLen;
cout<<"Введите строку:"<<endl;
/*gets(s);
d=strlen(s);
p=s[1];
for(i=2;i<d;i++)
if(strrchr(s[i],p)==0)
p=s[i]+p;*/
while(gets(text)!=NULL)
{
sLen = strlen(text);
for(i = 1; i < (sLen-1); i++){
if(text[i-1]=='.'){
for(i = 1; i < (sLen-1); i++){
{
for(j = 0; j < 33; j++) for(i = 0; i < 2; i++)
if(text[i] == T[i][j]) ;}}
cout<<text<<endl;
if(q==1) printf("%s\n", text);
cout<<p<<endl;
return 0;
Объяснение: