Pascal to Java

[KnighTeX]

Доброго времени суток! Пишу, собственно, вот по какому поводу. Нужно написать курсовую, а из языков программирования более-менее освоил лишь Паскаль. Так вот, задание курсовой следующее:

Разработать программу «Выравнивание». Исходная информация: текст, записанный в текстовом файле. Программа выводит этот текст с выравниванием по краям. Текст выводится без переносов слов. Параметры абзаца задаются в диалоговом режиме.

И то, что смог сделать на Паскале:

program format;
uses crt;
var
filename,slovo,stroka:string;
f:text;
dlina,otstup,i:byte;
simvol:char;
begin
slovo:=' ';
repeat
clrscr;
write('введите имя файла :'); readln(filename); write('введите отступ :'); readln(otstup); write('введите длину строки :'); readln(dlina); clrscr;
assign(f,filename);
reset(f);
until ioresult=0;
write(' ':otstup);
while not eof(f) do begin
read(f,simvol);
if ord(simvol)<>10 then begin
if simvol<>' ' then slovo:=slovo+simvol
else begin
if (length(stroka)+length(slovo))>dlina then begin stroka:=' ';
writeln;
write(' ':otstup);
end;
stroka:=stroka+slovo+simvol;
write(slovo,simvol);
slovo:=' ';
end;
end
else begin
write(slovo);
write(' ':otstup);
slovo:=' ';
stroka:=' ';
end;
end;
close(f);
readkey;
end.

Нужно либо этот код перевести в Java, либо написать что-нибудь подобное в той же Джаве. К сожаление, ни того, ни другого я не умею. Прошу помочь мне в этом. С уважением.

[KnighTeX]

Уважаемые товарищи программисты. Помогите, пожалуйста, с этим... Не умею я конвертацию между языками проводить, а очень нужно...

[KnighTeX]

public class format {
    public static String filename,slovo,stroka;
    public static text f;
    public static byte: dlina,otstup,i;
    public static char simvol;
    {
        slovo = " ";
        do {
            System.out.print("Введите имя файла :"); System.out.readln(filename);
            System.out.print("введите отступ :"); System.out.readln(otstup); 
            System.out.print("введите длину строки :"); System.out.readln(dlina);
            assign(f,filename);
            reset(f);
        } while (!(ioresult=0));
        System.out.print(" ":otstup);
        While(not end of file(f));{
        System.out.read(f,simvol);
        if(ord(simvol)<>10)
        {
            if(simvol<> " ") slovo = slovo+simvol
                    } else
        {
            if (length(stroka)+length(slovo))>dlina {
            stroka=" ";
            System.out.println;
            System.out.print(" ":otstup);
        }
            stroka=stroka+slovo+simvol;
            System.out.print(slovo, simvol);
            slovo=" ";
        }
        }else
    {
        System.out.print(slovo);
        System.out.print(" ":otstup);
        slovo=" ";
        stroka=" ";
    }
}
getKeyCode;
}

В общем, вот что получилось в итоге... Естественно, что неправильно. Может подскажет кто, где какие ошибки?

[KnighTeX]

Все еще жду вашей помощи...

[DelphiQuestions]

Оно хоть скомпилировалось ? Проше указать где нет ошибок, это ведь консольная программа где точка входа

public static void main{String args[]}{ }?

not end of file

Разве в джаве есть eof ?

System.out.print(" "tstup);

а где конкотинация ?

System.out.readln(otstup);

Почему system.out ввод это system.in и я бы посоветовал использовать сканнер да и обьект не обьявлен.

length(stroka)

в дажве как и в делфи через точку stroka.lenght();
вообще почитайте "Java SE6 Справочник" много времени не займет но там есть обьяснение всего что вам нужно правда ввод советую отдельно посмотреть видео уроки на ютубе или искать пример java scanner
Ах да вам там потребуется обрабатывать исключение ввода IOException почитайте про него и посмотрите примеры как его реализовывать