summaryrefslogtreecommitdiff
path: root/1/part2.f90
diff options
context:
space:
mode:
Diffstat (limited to '1/part2.f90')
-rw-r--r--1/part2.f9027
1 files changed, 0 insertions, 27 deletions
diff --git a/1/part2.f90 b/1/part2.f90
deleted file mode 100644
index b3d6bd2..0000000
--- a/1/part2.f90
+++ /dev/null
@@ -1,27 +0,0 @@
-program day1
- implicit none
-
- integer, parameter :: input_len = 200
- integer, parameter :: search = 2020
-
- integer :: i, j, k
- integer, dimension(input_len) :: input
-
- open(10, file='input', status='old')
- do i = 1, input_len
- read(10, *) input(i)
- end do
- close(10)
-
- do i = 1, input_len
- do j = 1, input_len
- do k = 1, input_len
- if (input(i) + input(j) + input(k) == search) then
- print *, input(i) * input(j) * input(k)
- stop
- end if
- end do
- end do
- end do
-
-end program day1