Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
pixzel
0 / 0 / 0
Регистрация: 26.05.2015
Сообщений: 1
#1

Отступ справа и плавная прокрутка

26.05.2015, 19:05. Просмотров 176. Ответов 0
Метки нет (Все метки)

Товарищи, подскажите, как реализовать отступ справа (ввод с клавиатуры)?
Также не могу понять, как в PacalABC.NET сделать плавную прокрутку вверх-вниз?

Вот сама программа
Pascal
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
42
43
44
45
uses
  graphabc;
 
const
  c: array [1..15, 1..3] of byte = ((0, 0, 0), (0, 0, 255), (0, 255, 0), (0, 255, 255),
  (255, 0, 0), (255, 0, 255), (165, 42, 42), (211, 211, 211),
  (169, 169, 169), (173, 216, 230), (144, 238, 144), (224, 255, 255),
  (255, 36, 0), (255, 255, 0), (255, 255, 255));
 
var
  h: byte;
 
var
  f: text;
  s: string;
  i: integer;
 
begin
  assign(f, 'input.txt');
  reset(f);
  SetFontSize(14); 
  begin
    repeat
      readln(h);
    until h in [1..16];
    setfontsize(14);
    setfontcolor(RGB(c[h, 1], c[h, 2], c[h, 3]));
    clearwindow;
    while not eof(f) do
    begin
      SetFontSize(14);
      readln(f, s);
     repeat
        for i := length(s) downto 1 do                   //Выравнивание по ширине
          if (s[i] = ' ') and (s[i - 1] <> ' ') then 
          begin
            insert(' ', s, i);
            if length(s) = 80 then break;
          end
      until length(s) >= 80; 
      writeln(s);
    end;
    close(f);
  end;
end.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.05.2015, 19:05
Ответы с готовыми решениями:

Как в System.Windows.Forms сделать отступ слева и справа?
Что написать чтобы было как на втором скрине? (в Paint переместил кнопку)

Плавная сортировка на Паскале
Дайте пример реализации плавной сортировки на Паскале :gconfusion:

Плавная прокрутка на JS
$(&quot;.buttUp&quot;).click(function (){ scrollBlock =...

Плавная горизонтальная прокрутка
Уже не нужно, сам сделал.

Плавная прокрутка в TScrollBox
Собственно как сделать плавную прокрутку в скролбокс'е ?

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.05.2015, 19:05

Плавная прокрутка к якорям
Всем привет! Возникла проблема, нужно сделать плавную прокрутку к якорям. Что я...

Плавная прокрутка изображения
Доброго дня. задача очень примитивна. моя реализация представлена тут -...

Плавная прокрутка к якорю
Здравствуйте, я пока только учусь...немного не догоняю, в общем на странице...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru