New PT4 files

This commit is contained in:
Mikhail Abramyan 2016-03-02 00:41:38 +03:00
parent 2228f762c8
commit 3b3872ed64
21 changed files with 116 additions and 90 deletions

Binary file not shown.

Binary file not shown.

View file

@ -1,9 +1,11 @@
Программирование, 1 ступень. Классная работа|Занятие 1. Введение в PascalABC.NET
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 1. Введение в PascalABC.NET
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
// Это комментарий. Компилятор его не видит
// Запустите программу, нажав F9
// writeln - это оператор вывода. Он выводит любые данные
// Это комментарий. Компилятор его не видит.
// Запустите программу, нажав F9.
// writeln - это оператор вывода. Он выводит любые данные.
begin
writeln(3.14);
writeln(123);
@ -18,9 +20,9 @@ begin
write(3);
end.
[3]
// С помощью writeln можно рисовать символами
// Изментие программу так, чтобы она нарисовала рожицу.
// Добавьте глаза, нос, рот
// С помощью writeln можно рисовать символами.
// Измените программу так, чтобы она нарисовала рожицу.
// Добавьте глаза, нос, рот.
begin
writeln(' ********* ');
writeln('* *');
@ -39,15 +41,15 @@ begin
writeln(2*3);
end.
[5]
// Разделите данные вывода пробелами как в первом операторе
// для того чтобы они не сливались
// Разделите данные вывода пробелами как в первом операторе,
// чтобы они не сливались.
begin
writeln(1,' ',2,' ',3);
writeln(4,5,6,7,8,9);
end.
[6]
// Вместо write можно использовать Print
// В чем их разница? Запишите в тетрадь
// Вместо write можно использовать Print.
// В чем их разница? Запишите в тетрадь.
begin
writeln(11,22,33,44,55);
Println(11,22,33,44,55);
@ -57,9 +59,9 @@ begin
Print(999);
end.
[7]
// Переменные - это ячейки памяти, хранящие значения
// Они используются в программе для вычислений
// Перед использованием переменную надо описать и присвоить ей значение
// Переменные - это ячейки памяти, хранящие значения.
// Они используются в программе для вычислений.
// Перед использованием переменную надо описать и присвоить ей значение.
begin
var a := 6;
var b := 4;
@ -67,33 +69,33 @@ begin
Print(a+b,a-b,a*b,a/b);
end.
[8]
// Перед выводом данных можно выводить пояснения в апострофах
// Аналогично сумме выведите разность, произведение и частное с пояснением
// Перед выводом данных можно выводить пояснения в апострофах.
// Аналогично сумме выведите разность, произведение и частное с пояснением.
begin
var a := 64;
var b := 48;
writeln('Ñóììà = ',a+b);
end.
[9]
// При наборе программы программист допускает ошибки
// При наборе программы программист допускает ошибки.
// Åñëè ïðîãðàììà ñîäåðæèò îøèáêó, êîìïèëÿòîð âûäàñò åå
// в специальном окне "Список ошибок"
// Исправьте ошибку и добейтесь чтобы
// программа откомпилировалась и запустилась
// в специальном окне "Список ошибок".
// Исправьте ошибку и добейтесь, чтобы
// программа откомпилировалась и запустилась.
bgin
var a := 64;
var b := 48;
writeln(a+b);
end.
[10]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64;
var b := 48;
writeln('Õîðîøî!');
end
[11]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64;
var b := 48;
@ -101,7 +103,7 @@ begin
writeln('Îòëè÷íî!');
end.
[12]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64
var b := 48
@ -109,7 +111,7 @@ begin
writeln('Âåëèêîëåïíî! Íå çàáûâàéòå ; ìåæäó îïåðàòîðàìè');
end.
[13]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64;
var b := 48;
@ -117,11 +119,12 @@ begin
wriel('Ïîòðÿñàþùå!');
end.
[14]
[#]
// Èñïîëíèòåëü Ðîáîò èìååò ñèñòåìó êîìàíä
// Left Right Up Down Paint
//  íà÷àëå ïðîãðàììû ÎÁßÇÀÒÅËÜÍÎ äîëæíà áûòü âûçâàíà
// команда Task с именем задания в апострофах
// Решите задачу для Робота, используя его команды
// команда Task с именем задания в апострофах.
// Решите задачу для Робота, используя его команды.
uses Robot;
@ -131,7 +134,7 @@ end.
[15]
// Ðåøèòå çàäà÷ó a2 äëÿ Ðîáîòà, íàæàâ êíîïêó
// ñ áóêâîé L íà ïàíåëè èíñòðóìåíòîâ è íàáðàâ èìÿ RBa2.
// Программа-заготовка RBa2.pas создастся в текущем каталоге
// Программа-заготовка RBa2.pas создастся в текущем каталоге.
// Àíàëîãè÷íî ðåøèòå çàäàíèÿ a3 è a4 äëÿ Ðîáîòà

View file

@ -1,11 +1,14 @@
Занятие 4. Оператор присваивания
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 2. Исполнитель Робот
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
[#]
// Исполнитель Робот имеет систему команд
// Left Right Up Down Paint
// В начале программы ОБЯЗАТЕЛЬНО должна быть вызвана
// команда Task с именем задания в апострофах
// Решите задачу a1 для Робота, используя его команды
// команда Task с именем задания в апострофах.
// Решите задачу a1 для Робота, используя его команды.
uses Robot;
@ -15,7 +18,7 @@ end.
[2]
// Решите задачу a2 для Робота, нажав кнопку
// с буквой L на панели инструментов и набрав имя RBa2.
// Программа-заготовка RBa2.pas создастся в текущем каталоге
// Программа-заготовка RBa2.pas создастся в текущем каталоге.
[3]
{ Нарисуйте с помощью Робота
*
@ -47,8 +50,8 @@ begin
end.
[5]
// Исправьте ошибки: пропушенные ";" и неправильные имена команд
// Запустите программу для Робота
// Исправьте ошибки: пропушенные ";" и неправильные имена команд.
// Запустите программу для Робота.
uses Robot;
begin
@ -83,14 +86,14 @@ begin
end
[6]
// Перепишите с доски программу вычисления периметра P
// и площади S прямоугольника по известным сторонам a,b
// и площади S прямоугольника по известным сторонам a,b.
begin
end.
[7]
// Опишите все необходимые переменные в разделе описаний
// до строки begin основной программы
// до строки begin основной программы.
begin

View file

@ -1,8 +1,10 @@
Занятие 4. Оператор присваивания
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 4. Оператор присваивания
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
// Îïèøèòå âñå íåîáõîäèìûå ïåðåìåííûå â ðàçäåëå îïèñàíèé
// до строки begin
// до строки begin.
begin
@ -13,7 +15,7 @@ begin
end.
[2]
// Îïèøèòå âñå íåîáõîäèìûå ïåðåìåííûå â òåêñòå îñíîâíîé ïðîãðàììû,
// поставив слово var перед первым использованием переменной
// поставив слово var перед первым использованием переменной.
begin
a := ReadReal;
@ -23,7 +25,7 @@ begin
Print(radd,rmult);
end.
[3]
// Исправьте названия функций на правильные
// Исправьте названия функций на правильные.
begin
var a := 2;
@ -70,8 +72,8 @@ begin
end.
[7]
// Поменяйте местами значения переменных b и c между вызовами Println
// Используйте вспомогательную переменную v
// Поменяйте местами значения переменных b и c между вызовами Println.
// Используйте вспомогательную переменную v.
begin
var a := 2;
@ -87,7 +89,7 @@ end.
// Ìåæäó âûçîâàìè Print
// ïîìåíÿéòå ìåñòàìè çíà÷åíèÿ ïåðåìåííûõ a è b,
// çàòåì çíà÷åíèÿ ïåðåìåííûõ c è d,
// дважды используя стандартную процедуру Swap
// дважды используя стандартную процедуру Swap.
begin
var a := 3;

View file

@ -1,4 +1,7 @@
Çàíÿòèå 5. Îïåðàòîð öèêëà for
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 5. Оператор цикла for
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
{

Binary file not shown.

Binary file not shown.

View file

@ -0,0 +1 @@
=|||%f|%x<0__>%X<0__>

View file

@ -1,6 +1,6 @@
PROGRAMMING TASKBOOK FOR PASCALABC.NET
Copyright (c) M. Abramyan, 1998-2015
Copyright (c) M. Abramyan, 1998-2016
LICENSE FOR USE AND DISTRIBUTION

View file

@ -3,7 +3,7 @@ PROGRAMMING TASKBOOK FOR PASCALABC.NET
Электронный задачник по программированию
(версия для системы PascalABC.NET)
Copyright (c) <20>. <20>. <20>בנאל<D790>ם, 1998-2015
Copyright (c) <20>. <20>. <20>בנאל<D790>ם, 1998-2016
ЛИЦЕНЗИОННОЕ СОГЛАШЕНИЕ ОБ ИСПОЛЬЗОВАНИИ И РАСПРОСТРАНЕНИИ

View file

@ -22,6 +22,8 @@ Section $(DESC_PT4) PT4
SetOutPath "$INSTDIR\PT4"
File "PT4\Results.abc"
${AddFile} "Results.abc"
File "PT4\_loadpabc.dat"
${AddFile} "_loadpabc.dat"
File "PT4\loadpabc.dat"
${AddFile} "loadpabc.dat"
File "PT4\Examloadpabc.dat"
@ -60,8 +62,8 @@ Section $(DESC_PT4) PT4
${AddFile} "PT4ExamBegin_ru.dll"
File "PT4\Lib\PT4ExamTaskC_ru.dll"
${AddFile} "PT4ExamTaskC_ru.dll"
File "PT4\Lib\PT-Add.dll"
${AddFile} "PT-Add.dll"
File "PT4\Lib\PT-Ext.dll"
${AddFile} "PT-Ext.dll"
File "PT4\Lib\PT4ExamCheck_ru.dll"
${AddFile} "PT4ExamCheck_ru.dll"

Binary file not shown.

BIN
bin/PT4/Lib/PT-Ext.dll Normal file

Binary file not shown.

View file

@ -1,9 +1,11 @@
Программирование, 1 ступень. Классная работа|Занятие 1. Введение в PascalABC.NET
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 1. Введение в PascalABC.NET
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
// Это комментарий. Компилятор его не видит
// Запустите программу, нажав F9
// writeln - это оператор вывода. Он выводит любые данные
// Это комментарий. Компилятор его не видит.
// Запустите программу, нажав F9.
// writeln - это оператор вывода. Он выводит любые данные.
begin
writeln(3.14);
writeln(123);
@ -18,9 +20,9 @@ begin
write(3);
end.
[3]
// С помощью writeln можно рисовать символами
// Изментие программу так, чтобы она нарисовала рожицу.
// Добавьте глаза, нос, рот
// С помощью writeln можно рисовать символами.
// Измените программу так, чтобы она нарисовала рожицу.
// Добавьте глаза, нос, рот.
begin
writeln(' ********* ');
writeln('* *');
@ -39,15 +41,15 @@ begin
writeln(2*3);
end.
[5]
// Разделите данные вывода пробелами как в первом операторе
// для того чтобы они не сливались
// Разделите данные вывода пробелами как в первом операторе,
// чтобы они не сливались.
begin
writeln(1,' ',2,' ',3);
writeln(4,5,6,7,8,9);
end.
[6]
// Вместо write можно использовать Print
// В чем их разница? Запишите в тетрадь
// Вместо write можно использовать Print.
// В чем их разница? Запишите в тетрадь.
begin
writeln(11,22,33,44,55);
Println(11,22,33,44,55);
@ -57,9 +59,9 @@ begin
Print(999);
end.
[7]
// Переменные - это ячейки памяти, хранящие значения
// Они используются в программе для вычислений
// Перед использованием переменную надо описать и присвоить ей значение
// Переменные - это ячейки памяти, хранящие значения.
// Они используются в программе для вычислений.
// Перед использованием переменную надо описать и присвоить ей значение.
begin
var a := 6;
var b := 4;
@ -67,33 +69,33 @@ begin
Print(a+b,a-b,a*b,a/b);
end.
[8]
// Перед выводом данных можно выводить пояснения в апострофах
// Аналогично сумме выведите разность, произведение и частное с пояснением
// Перед выводом данных можно выводить пояснения в апострофах.
// Аналогично сумме выведите разность, произведение и частное с пояснением.
begin
var a := 64;
var b := 48;
writeln('Ñóììà = ',a+b);
end.
[9]
// При наборе программы программист допускает ошибки
// При наборе программы программист допускает ошибки.
// Åñëè ïðîãðàììà ñîäåðæèò îøèáêó, êîìïèëÿòîð âûäàñò åå
// в специальном окне "Список ошибок"
// Исправьте ошибку и добейтесь чтобы
// программа откомпилировалась и запустилась
// в специальном окне "Список ошибок".
// Исправьте ошибку и добейтесь, чтобы
// программа откомпилировалась и запустилась.
bgin
var a := 64;
var b := 48;
writeln(a+b);
end.
[10]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64;
var b := 48;
writeln('Õîðîøî!');
end
[11]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64;
var b := 48;
@ -101,7 +103,7 @@ begin
writeln('Îòëè÷íî!');
end.
[12]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64
var b := 48
@ -109,7 +111,7 @@ begin
writeln('Âåëèêîëåïíî! Íå çàáûâàéòå ; ìåæäó îïåðàòîðàìè');
end.
[13]
// Исправьте ошибку и запустите программу
// Исправьте ошибку и запустите программу.
begin
var a := 64;
var b := 48;
@ -117,11 +119,12 @@ begin
wriel('Ïîòðÿñàþùå!');
end.
[14]
[#]
// Èñïîëíèòåëü Ðîáîò èìååò ñèñòåìó êîìàíä
// Left Right Up Down Paint
//  íà÷àëå ïðîãðàììû ÎÁßÇÀÒÅËÜÍÎ äîëæíà áûòü âûçâàíà
// команда Task с именем задания в апострофах
// Решите задачу для Робота, используя его команды
// команда Task с именем задания в апострофах.
// Решите задачу для Робота, используя его команды.
uses Robot;
@ -131,7 +134,7 @@ end.
[15]
// Ðåøèòå çàäà÷ó a2 äëÿ Ðîáîòà, íàæàâ êíîïêó
// ñ áóêâîé L íà ïàíåëè èíñòðóìåíòîâ è íàáðàâ èìÿ RBa2.
// Программа-заготовка RBa2.pas создастся в текущем каталоге
// Программа-заготовка RBa2.pas создастся в текущем каталоге.
// Àíàëîãè÷íî ðåøèòå çàäàíèÿ a3 è a4 äëÿ Ðîáîòà

View file

@ -1,11 +1,14 @@
Занятие 4. Оператор присваивания
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 2. Исполнитель Робот
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
[#]
// Исполнитель Робот имеет систему команд
// Left Right Up Down Paint
// В начале программы ОБЯЗАТЕЛЬНО должна быть вызвана
// команда Task с именем задания в апострофах
// Решите задачу a1 для Робота, используя его команды
// команда Task с именем задания в апострофах.
// Решите задачу a1 для Робота, используя его команды.
uses Robot;
@ -15,7 +18,7 @@ end.
[2]
// Решите задачу a2 для Робота, нажав кнопку
// с буквой L на панели инструментов и набрав имя RBa2.
// Программа-заготовка RBa2.pas создастся в текущем каталоге
// Программа-заготовка RBa2.pas создастся в текущем каталоге.
[3]
{ Нарисуйте с помощью Робота
*
@ -47,8 +50,8 @@ begin
end.
[5]
// Исправьте ошибки: пропушенные ";" и неправильные имена команд
// Запустите программу для Робота
// Исправьте ошибки: пропушенные ";" и неправильные имена команд.
// Запустите программу для Робота.
uses Robot;
begin
@ -83,14 +86,14 @@ begin
end
[6]
// Перепишите с доски программу вычисления периметра P
// и площади S прямоугольника по известным сторонам a,b
// и площади S прямоугольника по известным сторонам a,b.
begin
end.
[7]
// Опишите все необходимые переменные в разделе описаний
// до строки begin основной программы
// до строки begin основной программы.
begin

View file

@ -1,8 +1,10 @@
Занятие 4. Оператор присваивания
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 4. Оператор присваивания
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
// Îïèøèòå âñå íåîáõîäèìûå ïåðåìåííûå â ðàçäåëå îïèñàíèé
// до строки begin
// до строки begin.
begin
@ -13,7 +15,7 @@ begin
end.
[2]
// Îïèøèòå âñå íåîáõîäèìûå ïåðåìåííûå â òåêñòå îñíîâíîé ïðîãðàììû,
// поставив слово var перед первым использованием переменной
// поставив слово var перед первым использованием переменной.
begin
a := ReadReal;
@ -23,7 +25,7 @@ begin
Print(radd,rmult);
end.
[3]
// Исправьте названия функций на правильные
// Исправьте названия функций на правильные.
begin
var a := 2;
@ -70,8 +72,8 @@ begin
end.
[7]
// Поменяйте местами значения переменных b и c между вызовами Println
// Используйте вспомогательную переменную v
// Поменяйте местами значения переменных b и c между вызовами Println.
// Используйте вспомогательную переменную v.
begin
var a := 2;
@ -87,7 +89,7 @@ end.
// Ìåæäó âûçîâàìè Print
// ïîìåíÿéòå ìåñòàìè çíà÷åíèÿ ïåðåìåííûõ a è b,
// çàòåì çíà÷åíèÿ ïåðåìåííûõ c è d,
// дважды используя стандартную процедуру Swap
// дважды используя стандартную процедуру Swap.
begin
var a := 3;

View file

@ -1,4 +1,7 @@
Çàíÿòèå 5. Îïåðàòîð öèêëà for
Topic1=Программирование, 1 ступень. Классная работа
Topic2=Занятие 5. Оператор цикла for
Author=Воскресная компьютерная школа мехмата ЮФУ (sunschool.mmcs.sfedu.ru), 2016
[=PascalABC]
[1]
{

Binary file not shown.

1
bin/PT4/_loadpabc.dat Normal file
View file

@ -0,0 +1 @@
=|||%f|%x<0__>%X<0__>

Binary file not shown.