Вторник, 20.02.2018, 03:04
ПРОГРАММИРОВАНИЕ ДЛЯ НОВИЧКОВ. ТУРБО ПАСКАЛЬ.
Приветствую Вас Гость | RSS
Главная Регистрация Вход
меню сайта

Форма входа

Поиск

Календарь
«  Март 2010  »
ПнВтСрЧтПтСбВс
1234567
891011121314
15161718192021
22232425262728
293031

Друзья сайта
Русские программы
  • Официальный блог
  • Сообщество uCoz
  • FAQ по системе
  • Инструкции для uCoz

  • сайт создан

    Главная » 2010 » Март » 5 » УРОК 8. ФОРМАТИРОВАНИЕ ВЫВОДА.
    12:30
    УРОК 8. ФОРМАТИРОВАНИЕ ВЫВОДА.

    УРОК 8. ФОРМАТИРОВАНИЕ ВЫВОДА.

     

    ДАВАЙТЕ ПОГОВОРИМ О ФОРМАТИРОВАНИИ. ДОПУСТИМ, ЧТО ВАМ НЕОБХОДИМО ОТОБРАЗИТЬ ЧИСЛО В ФОРМЕ С ФИКСИРОВАННОЙ ТОЧКОЙ. ДЛЯ ЭТОГО ИСПОЛЬЗУЕТСЯ ТАКОЕ ОПИСАНИЕ:

     

    WRITELN (Wages:6:2);

     

    ФОРМАТ «6:2» ОПРЕДЕЛЯЕТ ПОЛЕ ДЛИНОЙ 6 СИМВОЛОВ, ВКЛЮЧАЯ ДВА ДЕСЯТИЧНЫХ ЗНАКА. ПРИВЕДУ ПРИМЕР, ЕСЛИ ПЕРЕМЕННАЯ Wages РАВНА 45.5, ТО ОНА БУДЕТ ИМЕТЬ ВИД:

     

    В45.50

     

    ГДЕ БУКВА «В» ОБОЗНАЧАЕТ ПРОБЕЛ.

    ЕСЛИ КОЛИЧЕСТВО ЧИСЕЛ В ВЫВОДИМОМ ЧИСЛЕ МЕНЬШЕ ШИРИНЫ ПОЛЯ ВЫВОДА, РЕЗУЛЬТАТ БУДЕТ СДВИНУТ ВПРАВО. ЕСЛИ ЧИСЛО НЕ ПОМЕЩАЕТСЯ В ПОЛЕ ВЫВОДА, ПОЛЕ БУДЕТ УВЕЛИЧЕНО И НА ЭКРАН ВЫВЕДЕТСЯ ЧИСЛО ЦЕЛИКОМ. НИЖЕ ПРИВЕДЁН ПРИМЕР, В КОТОРОМ ДОБАВЛЕН СИМВОЛ ДОЛЛАРА СЛЕВА ОТ ЧИСЛА $:

     

    WRITELN (‘$’,Wages:6:2);

     

    РЕЗУЛЬТАТ БУДЕТ ВЫГЛЯДЕТЬ ВОТ ТАК:

     

    $  45.50

     

    ИСПОЛЬЗУЯ МЕНЬШИЮ ШИРИНУ ПОЛЯ, МОЖНО СДВИНУТЬ ЧИСЛО ВЛЕВО, К СИМВОЛУ ДОЛЛАРА:

     

    WRITELN (‘$’,Wages:0:2);

     

    РЕЗУЛЬТАТ БУДЕТ:

     

    $45.50

     

    ТАКИМ ОБРАЗОМ МОЖНО ФОРМАТИРОВАТЬ ЛЮБОЙ ТИП ДАННЫХ, ИСКЛЮЧЕНИЕ СОСТАВЛЯЮТ ЦЕЛЫЕ ЧИСЛА И ТЕКСТОВЫЕ СТРОКИ, КОГДА ШИРИНА ПОЛЯ ОПРЕДЕЛЯЕТСЯ БЕЗ ДЕСЯТИЧНЫХ ЗНАКОВ.

    ВНИЗУ ПРИВЕДЁН ПРИМЕР ПРОГРАММЫ, ИЗ КОТОРОЙ ВЫ СМОЖЕТЕ НАГЛЯДНО РАЗОБРАТЬ ПРАВИЛА ФОРМАТИРОВАНИЯ:

     

    PROGRAM Format (OUTPUT);

    VAR

    A: INTEGER;

    B: REAL;

    BEGIN

    A:=320;

    B:=1.2E+02;

    WRITELN (‘ЭТО ТЕКСТОВАЯ СТРОКА, НАЧИНАЮЩАЯСЯ С ПОЗИЦИИ 1.’);

    WRITELN (‘ЭТО ТЕКСТОВАЯ СТРОКА СДВИНУТА К ПРАВОМУ КОНЦУ ПОЛЯ.’:50);

    WRITELN (‘ЭТО НЕФОРМАТИРОВАННОЕ ЦЕЛОЕ:’,A);

    WRITELN (‘ЭТО ЦЕЛОЕ, ЗАПИСАННОЕ В ПОЛЕ ШИРИНОЙ 6 СИМВОЛОВ:’,A:6);

    WRITELN (‘ЭТО КОЛИЧЕСТВО ДОЛЛАРОВ, ЗАПИСАННОЕ В ПОЛЕ ШИРИНОЙ 8 СИМВОЛОВ:$',B:0:2)

    END.

     

    НУ КАК, ПРИНЦИП ВАМИ СХВАЧЕН?! J ИДЁМ ДАЛЬШЕ, К СЛЕДУЮЩЕМУ УРОКУ.

     

    Просмотров: 6389 | Добавил: mila | Рейтинг: 0.0/0
    Всего комментариев: 1
    1  
    Very well written!
    I will immediately seize your rss as I can’t in finding your e-mail subscription hyperlink or e-newsletter service.
    Do you have any? Please let me realize in order that I could subscribe.

    Имя *:
    Email *:
    Код *:
    Архив записей

    Мини-чат

    подписка на рассыл
    Подписаться на турбо паскаль
    Имя:
    E-mail:

    Статистика

    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0

    Copyright MyCorp © 2018