Форум АНТИЧАТ - помогите с Фортраном 77 ыыы

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)

- - помогите с Фортраном 77 ыыы (https://forum.antichat.xyz/showthread.php?t=164544)

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

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

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

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

Цитата:

if n<10000 then
begin
Бла бла
end
else
begin
if n>=10000 then
begin
бла бла
end;
end;

Ну а если по теме то "if n>=10000 then" тебе не надо т.к. если это не n<10000 тогда это n>=10000

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

Цитата:

if n<10000 then
begin
Бла бла
end // Без ";"!!!
else
begin
Бла бла
end;
end;

ПСы: Это делфи