This commit is contained in:
Бондарев Иван 2015-12-01 20:45:29 +01:00
commit 984cdd233b
8 changed files with 37 additions and 35 deletions

View file

@ -15,7 +15,7 @@ internal static class RevisionClass
public const string Major = "3";
public const string Minor = "0";
public const string Build = "0";
public const string Revision = "1074";
public const string Revision = "1078";
public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

View file

@ -1,4 +1,4 @@
%MINOR%=0
%REVISION%=1074
%REVISION%=1078
%COREVERSION%=0
%MAJOR%=3

View file

@ -1 +1 @@
!define VERSION '3.0.0.1074'
!define VERSION '3.0.0.1078'

View file

@ -795,6 +795,8 @@ procedure WriteFormat(f: Text; formatstr: string; params args: array of object);
///и осуществляет переход на новую строку
procedure WritelnFormat(f: Text; formatstr: string; params args: array of object);
/// Âûâîäèò çíà÷åíèÿ s íà ýêðàí
procedure Print(s: string);
/// Выводит значения args на экран, выводя после каждого значения пробел
procedure Print(params args: array of object);
/// Выводит значения args на экран, выводя после каждого значения пробел, и переходит на новую строчку
@ -4860,6 +4862,11 @@ begin
writeln(f, s);
end;
procedure Print(s: string);
begin
write(s);
end;
procedure Print(params args: array of object);
begin
if args.Length = 0 then

View file

@ -306,23 +306,23 @@ procedure HideTask;
/// Вводит n целых чисел
/// и возвращает введенные числа в виде массива
function ReadArrInteger(n: integer): array of integer;
function ReadArrInteger(n: integer): array of integer;
/// Вводит n вещественных чисел
/// и возвращает введенные числа в виде массива
function ReadArrReal(n: integer): array of real;
function ReadArrReal(n: integer): array of real;
/// Вводит n строк
/// и возвращает введенные строки в виде массива
function ReadArrString(n: integer): array of string;
function ReadArrString(n: integer): array of string;
/// Вводит n целых чисел
/// и возвращает введенные числа в виде последовательности
function ReadSeqInteger(n: integer): System.Collections.Generic.IEnumerable<integer>;
function ReadSeqInteger(n: integer): System.Collections.Generic.IEnumerable<integer>;
/// Вводит n вещественных чисел
/// и возвращает введенные числа в виде последовательности
function ReadSeqReal(n: integer): System.Collections.Generic.IEnumerable<real>;
function ReadSeqReal(n: integer): System.Collections.Generic.IEnumerable<real>;
/// Вводит n строк
/// и возвращает введенные строки в виде последовательности
@ -330,11 +330,11 @@ function ReadSeqString(n: integer): System.Collections.Generic.IEnumerable<strin
/// Вводит размер набора целых чисел и его элементы
/// и возвращает введенный набор в виде последовательности
function ReadSeqInteger(): System.Collections.Generic.IEnumerable<integer>;
function ReadSeqInteger(): System.Collections.Generic.IEnumerable<integer>;
/// Вводит размер набора вещественных чисел и его элементы
/// и возвращает введенный набор в виде последовательности
function ReadSeqReal(): System.Collections.Generic.IEnumerable<real>;
function ReadSeqReal(): System.Collections.Generic.IEnumerable<real>;
/// Вводит размер набора строк и его элементы
/// и возвращает введенный набор в виде последовательности
@ -342,19 +342,18 @@ function ReadSeqString(): System.Collections.Generic.IEnumerable<string>;
/// Вводит размер набора целых чисел и его элементы
/// и возвращает введенный набор в виде массива
function ReadArrInteger(): array of integer;
function ReadArrInteger(): array of integer;
/// Вводит размер набора вещественных чисел и его элементы
/// и возвращает введенный набор в виде массива
function ReadArrReal(): array of real;
function ReadArrReal(): array of real;
/// Вводит размер набора строк и его элементы
/// и возвращает введенный набор в виде массива
function ReadArrString(): array of string;
function ReadArrString(): array of string;
// == Конец дополнений к версии 4.14 ==
implementation
const
@ -1469,11 +1468,6 @@ begin
PT4.Put(self[i,j]);
end;
{procedure Proba<T>(self: array of T); extensionmethod;
begin
PT4.Put(111);
end;}
/// Выводит в разделе отладки окна задачника
/// комментарий cmt, размер последовательности и значения,
/// полученные из элементов последовательности

Binary file not shown.

View file

@ -795,6 +795,8 @@ procedure WriteFormat(f: Text; formatstr: string; params args: array of object);
///и осуществляет переход на новую строку
procedure WritelnFormat(f: Text; formatstr: string; params args: array of object);
/// Âûâîäèò çíà÷åíèÿ s íà ýêðàí
procedure Print(s: string);
/// Выводит значения args на экран, выводя после каждого значения пробел
procedure Print(params args: array of object);
/// Выводит значения args на экран, выводя после каждого значения пробел, и переходит на новую строчку
@ -4860,6 +4862,11 @@ begin
writeln(f, s);
end;
procedure Print(s: string);
begin
write(s);
end;
procedure Print(params args: array of object);
begin
if args.Length = 0 then

View file

@ -306,23 +306,23 @@ procedure HideTask;
/// Вводит n целых чисел
/// и возвращает введенные числа в виде массива
function ReadArrInteger(n: integer): array of integer;
function ReadArrInteger(n: integer): array of integer;
/// Вводит n вещественных чисел
/// и возвращает введенные числа в виде массива
function ReadArrReal(n: integer): array of real;
function ReadArrReal(n: integer): array of real;
/// Вводит n строк
/// и возвращает введенные строки в виде массива
function ReadArrString(n: integer): array of string;
function ReadArrString(n: integer): array of string;
/// Вводит n целых чисел
/// и возвращает введенные числа в виде последовательности
function ReadSeqInteger(n: integer): System.Collections.Generic.IEnumerable<integer>;
function ReadSeqInteger(n: integer): System.Collections.Generic.IEnumerable<integer>;
/// Вводит n вещественных чисел
/// и возвращает введенные числа в виде последовательности
function ReadSeqReal(n: integer): System.Collections.Generic.IEnumerable<real>;
function ReadSeqReal(n: integer): System.Collections.Generic.IEnumerable<real>;
/// Вводит n строк
/// и возвращает введенные строки в виде последовательности
@ -330,11 +330,11 @@ function ReadSeqString(n: integer): System.Collections.Generic.IEnumerable<strin
/// Вводит размер набора целых чисел и его элементы
/// и возвращает введенный набор в виде последовательности
function ReadSeqInteger(): System.Collections.Generic.IEnumerable<integer>;
function ReadSeqInteger(): System.Collections.Generic.IEnumerable<integer>;
/// Вводит размер набора вещественных чисел и его элементы
/// и возвращает введенный набор в виде последовательности
function ReadSeqReal(): System.Collections.Generic.IEnumerable<real>;
function ReadSeqReal(): System.Collections.Generic.IEnumerable<real>;
/// Вводит размер набора строк и его элементы
/// и возвращает введенный набор в виде последовательности
@ -342,19 +342,18 @@ function ReadSeqString(): System.Collections.Generic.IEnumerable<string>;
/// Вводит размер набора целых чисел и его элементы
/// и возвращает введенный набор в виде массива
function ReadArrInteger(): array of integer;
function ReadArrInteger(): array of integer;
/// Вводит размер набора вещественных чисел и его элементы
/// и возвращает введенный набор в виде массива
function ReadArrReal(): array of real;
function ReadArrReal(): array of real;
/// Вводит размер набора строк и его элементы
/// и возвращает введенный набор в виде массива
function ReadArrString(): array of string;
function ReadArrString(): array of string;
// == Конец дополнений к версии 4.14 ==
implementation
const
@ -1469,11 +1468,6 @@ begin
PT4.Put(self[i,j]);
end;
{procedure Proba<T>(self: array of T); extensionmethod;
begin
PT4.Put(111);
end;}
/// Выводит в разделе отладки окна задачника
/// комментарий cmt, размер последовательности и значения,
/// полученные из элементов последовательности