% Delfiinit1.m
% 
close all
r=0.06;
t0=2017.5; y0=100;tloppu=2025.5;

% Ratkaisufunktio:
y=@(t) y0.*exp(r.*(t-t0));
yloppu=round(y(tloppu));
% Piirretään ratkaisufunktio
t=linspace(t0,tloppu);
plot(t,y(t),'LineWidth',2)
hold on; grid on
% Merkitään loppupiste:
plot(tloppu,yloppu,'.','MarkerSize',10)
title(['Vuonna 2025.5 Delfiinejä ',num2str(yloppu),' kpl'])
display('Loppuarvo vuonna 2025.5');
yloppu


