imho.ws
IMHO.WS  

Вернуться   IMHO.WS > Компьютеры > Программирование
Опции темы
Старый 20.10.2006, 09:56     # 1
-=[Stal7]=-
Junior Member
 
Аватар для -=[Stal7]=-
 
Регистрация: 07.10.2002
Адрес: Великая Курляндская Империя
Сообщения: 65

-=[Stal7]=- Путь к славе только начался
Question Помогите перевести код из Pascal в Java

PHP код:
 Pascal:
int main() {
    
FILE *sisf fopen("nadal.sis""rt");
    
char N;
    
int PPKKAAAA;
    
fscanf(sisf"%c, %d.%d.%d", &N, &PP, &KK, &AAAA);
    
fclose(sisf);

    
int esmaspaev_PP;
    
esmaspaev_PP PP anna_nadalapaeva_nr(N);
    if (
esmaspaev_PP <= 0) {
        
esmaspaev_PP += paevi_eelmises_kuus(KKAAAA);
    }
    
    
int nadal = (esmaspaev_PP 1) / 1;

    
FILE *valf fopen("nadal.val""wt");
    
fprintf(valf"%d\n"nadal);
    
fclose(valf);

    return 
0;

В этоге, есть текстовой файл, в нем написано "N, 11, 11, 1988"
Думаю по коду вполне понятно, что с ним надо делать.
Простите за тупость, но уже 3 дня ничего не получается, потому обращаюсь к любимому форуму.

Спасибо зараннее заинтересовывшимся.
__________________
Простите Ламера...
-=[Stal7]=- вне форума  
Старый 20.10.2006, 12:07     # 2
shuron
Full Member
 
Аватар для shuron
 
Регистрация: 16.09.2003
Сообщения: 793

shuron Луч света в тёмном царствеshuron Луч света в тёмном царствеshuron Луч света в тёмном царствеshuron Луч света в тёмном царствеshuron Луч света в тёмном царстве
Я в паскале никогда не хакал, но помойму anna_nadalapaeva_nr(N) и paevi_eelmises_kuus(KK, AAAA) это вызовы функций котрые тут не описаны..
или нет?
shuron вне форума  
Старый 20.10.2006, 12:11     # 3
/7y3uK
Advanced Member
 
Аватар для /7y3uK
 
Регистрация: 09.03.2004
Адрес: толстозадая Москва
Сообщения: 498

/7y3uK Реально крут(а)/7y3uK Реально крут(а)/7y3uK Реально крут(а)/7y3uK Реально крут(а)
гы, я уже совсем забыл паскакаль опишите человеческим языком что тут происходит, я накатаю премерчег на жабе...
__________________
В нашей стране настаивать на кореньях, черной смородине, лимонных корках - гораздо эффективнее, чем на правах
/7y3uK вне форума  
Старый 20.10.2006, 12:33     # 4
Tano
Junior Member
 
Аватар для Tano
 
Регистрация: 01.05.2004
Сообщения: 175

Tano Известность не заставит себя ждать
Хм..прошу прощения, но это код на с++, а не на паскале.
__________________
Don't keep your mind in a [frame]!
Tano вне форума  
Старый 20.10.2006, 13:53     # 5
EvroStandart
Full Member
 
Аватар для EvroStandart
 
Регистрация: 20.01.2004
Адрес: Таллинн
Пол: Male
Сообщения: 623

EvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собойEvroStandart Имеются все основания чтобы гордиться собой
Цитата:
Сообщение от shuron
Я в паскале никогда не хакал, но помойму anna_nadalapaeva_nr(N) и paevi_eelmises_kuus(KK, AAAA) это вызовы функций котрые тут не описаны..
или нет?
Если я не ошибаюсь, это эстонский. типа дай_номер_дня_недели и дней_в_прошлом_месяце. Строго самопальные функции.
EvroStandart вне форума  
Старый 20.10.2006, 14:04     # 6
crawler
Full Member
 
Регистрация: 11.12.2002
Сообщения: 864

crawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собойcrawler Имеются все основания чтобы гордиться собой
это действительно синтакс с++

/7y3uK
psudo code:

Код:
read from text file  "nadal.txt" line ( character>N, integer>PP, integer>KK, integer>AAAA)

do some math:
   int esmaspaev_PP; 
    esmaspaev_PP = PP - anna_nadalapaeva_nr(N); 
    if (esmaspaev_PP <= 0) { 
        esmaspaev_PP += paevi_eelmises_kuus(KK, AAAA); 
    } 
   int nadal = (esmaspaev_PP - 1) / 7 + 1; 

write value of nadal  to text file "nadal.val"
функции paevi_eelmises_kuus() и anna_nadalapaeva_nr() остуствуют
crawler вне форума  
Старый 20.10.2006, 16:49     # 7
-=[Stal7]=-
Junior Member
 
Аватар для -=[Stal7]=-
 
Регистрация: 07.10.2002
Адрес: Великая Курляндская Империя
Сообщения: 65

-=[Stal7]=- Путь к славе только начался
Как я рад что сразу стоко отзывов.

Значит, в первую очередь прошу прощения за то что перепутал C++ и Паскаль, не с одним из них не работал, потому и возникают ошибки такого рода.

Теперь о коде... Будь С++ или Паскаль, или ваще Q-basic

int main() { - главный метод (вроде бы)
FILE *sisf = fopen("nadal.sis", "rt"); - открыть файл nadal.sis, который "только для чтения"

char N; - собственно, чар N
int PP, KK, AAAA; - Числовые переменные PP, KK и AAAA
fscanf(sisf, "%c, %d.%d.%d", &N, &PP, &KK, &AAAA); - файл nadal.sis имеет одну единственную строчку типа: N, 10, 07, 1988 (N - nadala paev - день недели, KK - kuu - месяц, AAAA - aasta - год.)
Цель: мне нужно объяснить яве, что Char N должен принять буквенное значение = 1ой букве в строчке. Соответственно PP = 10 и KK = 07, АААА= 1988 (числовые значения.

N, 10, 07, 1988 - вся эта строка 15 символов, тобишь он должен упускать запятые и пробелы и придавать моим переменным (N, PP, KK, AAAA) значения, те что указаны в файле.

Надеюсь будет понятно. трудно объяснить того чего сам не понимаю

Затем я с ними собираюсь работать, но эта другая история.




fclose(sisf);


Оставшаяся часть меня особо не интересует, ту сам перекодирую.
}

А переменные nadala_paev и еще какая-то здесь действительно не указаны, и потой причине что не о них собственно возня..

Главное, это присвоить 4ем переменным значения из файла (каждой своё)

__________________
Простите Ламера...
-=[Stal7]=- вне форума  
Старый 21.10.2006, 20:23     # 8
/7y3uK
Advanced Member
 
Аватар для /7y3uK
 
Регистрация: 09.03.2004
Адрес: толстозадая Москва
Сообщения: 498

/7y3uK Реально крут(а)/7y3uK Реально крут(а)/7y3uK Реально крут(а)/7y3uK Реально крут(а)
надеюсь я все правильно понял...
Код:
public class Example {

    private static final class DateView {
        private String n;
        private int day;
        private int month;
        private int year;

        private DateView(String n, int day, int month, int year) {
            this.n = n;
            this.day = day;
            this.month = month;
            this.year = year;
        }

        public String getN() {
            return n;
        }

        public int getDay() {
            return day;
        }

        public int getMonth() {
            return month;
        }

        public int getYear() {
            return year;
        }

        public String toString() {
            return n + '/' + day + '/' + month + '/' + year;
        }
    }

    public static void main(String[] args) {
        Scanner scanner = new Scanner(Example.class.getResourceAsStream("nadal.sis"));
        scanner.useDelimiter(",\\s");
        DateView dateView = new DateView(scanner.next(), scanner.nextInt(), scanner.nextInt(), scanner.nextInt());
        System.out.println(dateView);
    }
}
соответственно, файлик я бросил рядом с классом, нужно переделать, чтобы нормально получать имя файла...
Если б какой-то непонятный N, то можно бы было считать ридером тупо строку и попарсить с помощью SimpleDateFormat сразу в объект Date или Calendar, у которого есть все эти геттеры вплоть до автоматического высчитывания дня недели...
__________________
В нашей стране настаивать на кореньях, черной смородине, лимонных корках - гораздо эффективнее, чем на правах
/7y3uK вне форума  
Старый 22.10.2006, 03:21     # 9
-=[Stal7]=-
Junior Member
 
Аватар для -=[Stal7]=-
 
Регистрация: 07.10.2002
Адрес: Великая Курляндская Империя
Сообщения: 65

-=[Stal7]=- Путь к славе только начался
THANK YOU VERY MUCH ! ! !

Всем большое спасибо за помощь.

ТЕМУ МОЖНО ЗАКРЫВАТЬ
__________________
Простите Ламера...

Последний раз редактировалось -=[Stal7]=-; 22.10.2006 в 16:31.
-=[Stal7]=- вне форума  

Опции темы

Ваши права в разделе
Вы НЕ можете создавать новые темы
Вы не можете отвечать в темах.
Вы НЕ можете прикреплять вложения
Вы НЕ можете редактировать свои сообщения

BB код Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.

Быстрый переход


Часовой пояс GMT +4, время: 08:35.




Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.