Настроение сейчас - Никада не буду програмером

Program predlozsh
write(*,*)'Тов. пять_безумных_штанин,
Выношу на повестку дня своё предложение образовавшееся у меня в голове в результате сложных умственных

преобразований а именно:'
read(*,*)-я люблю фотографировать
read(*,*)-ты сдуваешься после баночки коктеля
read(*,*)-мну нравяца необычные ракурсы
read(*,*)-у тебя фотоаппрат лучше чем у мну
read(*,*)-мне лень орезать фотки и их размещать
read(*,*)-ты мало снимаешь
read(*,*)-а я снимаю много
program fun Предложение:
do(*,*)На сходке ты вручаешь мне свой фоотоаппрат, я снимаю(много), а ты потом уменьшаешь ети фотки, и

размещаешь

WRITE(*,*)'З.Ы. Данный метод позволяет избежать размещения в постах и альбомах сообщества компроматов на

тебя, таких как есть у меня, но я не буду показывать.'
end do
if(если вы даете мне фотоаппрат)then go to 1
1 Мы все часливы и радуемся новым фоткам
ELSE
GOTO 2
write(*.*) goto 3
2 Мы все тоже счаслиты и радуемся новым фоткам
3 FUNCTION РАЗМЕШЕНИЯ ФОТОГРАФИЙ КОМПРОМЕНТИРУЕЩЕГО СОДЕРЖАНИЯ
END IF
end