with ada.text_io; use ada.text_io; 
with ada.integer_text_io; use ada.integer_text_io; 
with ada.float_text_io; use ada.float_text_io; 
 
procedure e1  is 
    name: String(1 .. 20);
    id: String(1 .. 6);
    salary: float;
begin
    skip_line;
    while not end_of_file loop
        get(name);
        get(id);
        get(salary);

        put(name);
        put(id);
        put(salary, fore=>9, aft=>2, exp=>0);
        new_line;
    end loop;
    put_line("all done");
end e1;