составить программу которая обретает количество двузначных чисел фибоначчи которые начиная с

какой язык?

Паскаль

Var a,b,c,n,n2,z:integer;
begin
 write('введите номер первого числа n ==gt; ');
 readln(n);
 write('введите разыскиваемый остаток ==gt; z ');
 readln(z);
 b:=0;
 n2:=0; 
a:=1;
  while clt;100 do begin
    c:=a+b; 
    b:=a;
    a:=c;
    n2:=n2+1;
    if (n2gt;=n) and (c mod 5 = z) then writeln('необходимое число ==gt; ',c);    
  end;
end.