помогите с Фортраном 77 ыыы

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by DiSi, 19 Dec 2009.

  1. DiSi

    DiSi Member

    Joined:
    7 Dec 2007
    Messages:
    0
    Likes Received:
    19
    Reputations:
    0
    Program s3
    print*,'vedite kytovuy skorost'
    read*,w
    t=1200
    n=(w*t)/(2*3.14)
    if n<10000 then
    print 10,n
    10 Format(a0,f6,0)
    else if n>=10000 then
    print 11,n
    11 Format(a0,f5,1)
    end if
    end

    вот код ошибка в строках
    if n<10000 then
    else if n>=10000 then

    че ему по синтаксу не нравиться?((
    и если не сложно обясниет на счет оператотора формат а то не оч его понял


    пс я делфи кодер( ненавижу фортран(((
     
  2. НTL

    НTL Elder - Старейшина

    Joined:
    26 Jan 2008
    Messages:
    715
    Likes Received:
    205
    Reputations:
    -26
    Ну а если по теме то "if n>=10000 then" тебе не надо т.к. если это не n<10000 тогда это n>=10000

    Из этого нам надо такой код...

    ПСы: Это делфи
     
    #2 НTL, 19 Dec 2009
    Last edited: 19 Dec 2009