+ 1; .lines.add ( Синтаксична роль слова Імені вказана вірно: + Обставина );
srichedit1.lines.add ( ); (scombobox16.Text= ) then
ResultZad1:=ResultZad1 + 0; .lines.add ( Синтаксична роль слова Імені вказана не вірно. + Правильна відповідь: Обставина ) ;. lines.add ( Ви нічого не написали );
srichedit1.lines.add ( );:=ResultZad1 + 0; .lines.add ( Синтаксична роль слова Імені вказана не вірно. + Правильна відповідь: Обставина raquo ;) ;. lines.add ( Ви написали: + scombobox16.Text);
srichedit1.lines.add(laquo;raquo;);;(scombobox24.Text=laquo;Дополнениеraquo;) then:=ResultZad1 + 1; .lines.add ( Синтаксична роль слова Псевдонімом вказана вірно: + Доповнення ) ;. lines.add ( ); (scombobox24.Text= ) then:=ResultZad1 + 0; .lines.add ( Синтаксична роль слова Псевдонімом вказана не вірно. + Правильна відповідь: Доповнення ) ;. lines.add ( Ви нічого не написали );
srichedit1.lines.add ( );:=ResultZad1 + 0; .lines.add ( Синтаксична роль слова Псевдонімом вказана не вірно. + Правильна відповідь: Доповнення raquo ;) ;. lines.add ( Ви написали: + scombobox24.Text);
srichedit1.lines.add ( ) ;; (sedit25.Text= Ім'я ) or
(sedit25.Text= ім'я ) then:=ResultZad1 + 1; .lines.add ( Початкова форма слова Імені вказана вірно: + Ім'я ) ;. lines.add ( ); (sedit25.Text= ) then
ResultZad1:=ResultZad1 + 0; .lines.add ( Початкова форма слова Імені вказана не вірно. + Правильна відповідь: Ім'я ) ;. lines.add ( Ви нічого не написали );
srichedit1.lines.add ( );:=ResultZad1 + 0; .lines.add ( Початкова форма слова Імені вказана не вірно. + Правильна відповідь: Ім'я raquo ;) ;. lines.add ( Ви написали: + sedit25.Text);
srichedit1.lines.add(laquo;raquo;);;(sedit12.Text=laquo;Псевдонимraquo;) or
(sedit12.Text= псевдонім ) then:=ResultZad1 + 1; .lines.add ( Початкова форма слова Псевдонім вказана вірно: + Псевдонім ) ;. lines.add ( ); (sedit12.Text= ) then
ResultZad1:=ResultZad1 + 0; .lines.add ( Початкова форма слова Псевдонім вказана не вірно. + Правильна відповідь: Псевдонім ) ;. lines.add ( Ви нічого не написали );
srichedit1.lines.add ( );:=ResultZad1 + 0; .lines.add ( Початкова форма слова Псевдонім вказана не вірно. + Правильна відповідь: Псевдонім raquo ;) ;. lines.add ( Ви написали: + sedit12.Text);
srichedit1.lines.add ( ) ;;. Caption:= Ваш бал: + IntToStr (ResultZad1) + з + Laquo; 18 raquo ;;
srichedit1.Lines.Add ( Загальна колличество балів за друге завдання третього вправи: + IntToStr (ResultZad1) + '
з + Raquo; 18 ) ;. Lines.Add ( ') ;. Enabled:=false;
end ;; TFormLess16Lvl3.btn1Click (Sender: TObject) ;: string; .PlainText:=false; .Filter:= RTF | * .rtf | Word file | * .doc raquo ;; ssavedialog1.Execute then:=ssavedialog1.FileName; .Lines.SaveToFile (f) ;;
end.
ДОДАТОК Г
КОНТРОЛЬНИЙ ПРИКЛАД
Відкриваємо директорію з програмою і в залежності від того, яка операційна система у вас встановлена, відкриваємо відповідну папку.
Малюнок Г.1 - Основна директорія
Запускаємо в будь-якому порядку розташовані в директорії файли.
Малюнок Г.2 - Файли необхідні для стабільної роботи програми
Повертаємося в основну директорію відкриваємо папку «Програма» і двічі клікаємо лівою кнопкою миші по значку «Project1».
Малюнок Г.3 - Вікно - заставка
При відкритті програми з'являється вікно - заставка, яке через кілька перетікає в Головне вікно програми (дивитися малюнок Г.4)
Малюнок Г.4 - Головне вікно програми
У даному вікні вибираємо послідовність уроків, наприклад, з 13 по 18 уроки.
Малюнок Г.5 - Вікно уроків
У даній вкладці вибираємо урок, переміщаючись по вкладках. Потім вибираємо рівень складності.
Малюнок Г.6 - Вкладка «Теоретичний матеріал»
У даній вкладці ознайомлюється з наданими матеріалом. Далі виконуємо вправи.
Малюнок Г.7 - Вправи з редагованими полями
У вправах даного роду вписуємо в поля слова або закінчення. Після того, як вписали всі слова або закінчення натискаємо кнопку «Перевірити» і програма видає нам результат.
Малюнок Г.8 - Вправи на перетягування