Console spreadsheet для PascalABC.Net: различия между версиями
Содержимое удалено Содержимое добавлено
Нет описания правки |
Нет описания правки |
||
Строка 129:
current_spreadsheet_ceil_string_coordinate:=current_spreadsheet_ceil_string_coordinate+1;
End;
// вывод линейки
For start3:=1 to spreadsheet_max_size_X do
Begin
For start4:=1 to Max_values_in_spreadsheet[current_spreadsheet_ceil_string_coordinate] do
Begin
Write('-');
End;
Write('+');
End;
// вывод линейки - end
// Переход к следующей строке
current_spreadsheet_ceil_column_coordinate:=current_spreadsheet_ceil_column_coordinate+1;
| |||