language: Fortran (gfortran-4.3.4)
date: 129 days 13 hours ago
link:
visibility: public
1
2
3
4
5
6
7
8
real a, b, pole
write(*,*) 'Podaj a'
read  (*,*) a
write(*,*) 'Podaj b'
read  (*,*) b
pole = a*b
write(*,*) 'Pole = ', pole
end