Fortran: Привет, Мир!
По традиции начнем с написания программы 'Hello, World!'. Эта программа будет выводить на экран текст:
Hello, World!
На языке Fortran это будет выглядеть так:
print *, 'Hello, World!'
Текст Hello, World! появится на экране благодаря команде print *, 'Hello, World!'. Такая команда выводит на экран текст, который указан в кавычках 'Hello, World!', и переводит курсор на новую строку. То есть вся информация после Hello, World! будет выводиться на экране на следующей строке.
Задание
Наберите в редакторе код из задания, символ в символ, и нажмите «Проверить».
print *, 'Hello, World!'
Что произойдет дальше: так как Fortran — компилируемый язык, то написанный код отправится на сервера code-basics, там компилятор превратит написанный исходный код в исполняемый, выполнит его и вернет обратно на сайт результат исполнения.
Внимание: если вы напишете heLLo, woRld! вместо Hello, World!, то это будет считаться другим текстом, потому что заглавные и строчные буквы — это разные символы. Размер буквы называют регистром, и говорят: регистр — важен! Это касается почти всего в коде, поэтому привыкайте всегда обращать внимание на регистр.
Упражнение не проходит проверку — что делать? 😶
Если вы зашли в тупик, то самое время задать вопрос в «Обсуждениях». Как правильно задать вопрос:
- Обязательно приложите вывод тестов, без него практически невозможно понять что не так, даже если вы покажете свой код. Программисты плохо исполняют код в голове, но по полученной ошибке почти всегда понятно, куда смотреть.
В моей среде код работает, а здесь нет 🤨
Тесты устроены таким образом, что они проверяют решение разными способами и на разных данных. Часто решение работает с одними входными данными, но не работает с другими. Чтобы разобраться с этим моментом, изучите вкладку «Тесты» и внимательно посмотрите на вывод ошибок, в котором есть подсказки.
Мой код отличается от решения учителя 🤔
Это нормально 🙆, в программировании одну задачу можно выполнить множеством способов. Если ваш код прошел проверку, то он соответствует условиям задачи.
В редких случаях бывает, что решение подогнано под тесты, но это видно сразу.
Прочитал урок — ничего не понятно 🙄
Создавать обучающие материалы, понятные для всех без исключения, довольно сложно. Мы очень стараемся, но всегда есть что улучшать. Если вы встретили материал, который вам непонятен, опишите проблему в «Обсуждениях». Идеально, если вы сформулируете непонятные моменты в виде вопросов. Обычно нам нужно несколько дней для внесения правок.
Кстати, вы тоже можете участвовать в улучшении курсов: внизу есть ссылка на исходный код уроков, который можно править прямо из браузера.
Ваше упражнение проверяется по этим тестам
1module tests
2implicit none
3
4contains
5 subroutine test()
6 use naturalfruit
7 integer :: ios
8 character(100) :: actual, filename='stdout'
9
10 ! Get data from stdout
11 open(6, file=filename)
12 include 'solution.f90'
13 close(6)
14
15 open(6, file=filename)
16 do
17 read(6, '(a)', iostat = ios) actual
18 if (ios /= 0) exit
19 end do
20 close(6)
21
22 open(6, file='/dev/stdout')
23 ! ---------------------
24
25 call set_case_name('base test')
26 call assert_equal('Hello, World!', actual)
27 end subroutine test
28
29end module tests
30Решение учителя откроется через:
