Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
EXERCISE
PROGRAM TEST_01 IMPLICIT NONE INTEGER::N=24 IF(MOD(N,2)==0)THEN PRINT*,N,'IS EVEN' PRINT*,'THE NUMBER IS',N PRINT*,'THE CUVE NUMBER IS N**3' ELSE PRINT*,N,'IS ODD' PRINT*,'THE NUMBER IS',N PRINT*,'THE SQUARE NUMBER IS N**2' END IF END PROGRAM TEST_01
run
|
edit
|
history
|
help
0
first
222
Gauss forward elimination
Summation of 1 to 100 integer namber
Exercicio 1
Pivot 3
A_02 GUASS SEIDEL METHOD
Subroutine problem
Regression
A_02 QUESTIONS NUMBER 3