C++ :

#include<cstdio>
using namespace std;
int a,b;
int main()
{
    int m,s,t,i;
    scanf("%d%d%d",&m,&s,&t);
    for(i=1;i<=t;++i)
    {
        a+=17;
        if(m>=10)
        {
            b+=60;
            m-=10;
        }
        else
          m+=4;
        if(b>a)
          a=b;
        if(a>=s)
        {
            printf("Yes");
            printf("\n");
            printf("%d",i);
            return 0;
        }
    }
    if(a>=s)
    {
        printf("Yes");
        printf("\n");
        printf("%d",i-1);
    }
    if(a<s)
    {
        printf("No");
        printf("\n");
        printf("%d",a);
    }
    return 0;
}

Pascal :

var 
m,s,t,ti:longint; 
ms:array[1..2,0..300000] of longint; 
ts:array[0..300000] of longint; 
begin 
readln(m,s,t); 
ms[2,0]:=m; 
ts[0]:=0; 
for ti:=1 to t do 
begin 
if ms[2,ti-1]>=10 then 
begin 
ms[1,ti]:=ms[1,ti-1]+60; 
ms[2,ti]:=ms[2,ti-1]-10; 
end 
else 
begin 
ms[1,ti]:=ms[1,ti-1]; 
ms[2,ti]:=ms[2,ti-1]+4; 
end; 
if ts[ti-1]+17>ms[1,ti] then ts[ti]:=ts[ti-1]+17 else ts[ti]:=ms[1,ti]; 
if ts[ti]>=s then 
begin 
writeln('Yes'); 
writeln(ti); 
close(output);
halt; 
end; 
end; 
writeln('No'); 
writeln(ts[t]); 
end.