Пример форматированного вывода невещественных типов

Задача

Вывести на экран введенные пользователем данные в полях шириной, заданной по умолчанию, и полях шириной, определяемой пользователем.

Решение

var
    fname,sname: string;
    age: byte;
    f,s,a: byte;
 
begin
    write('Name: ');
    readln(fname);
    write('Surname: ');
    readln(sname);
    write('Age: ');
    readln(age);
 
    writeln(fname:10,sname:20,age:5);
    writeln;
 
    write('Fields for name, surname and age: ');
    readln(f,s,a);
    writeln(fname:f,sname:s,age:a);
end.

Тема

Линейные алгоритмы

Уровень

Простые задачи