Паскаль.

есть n количество студентов и t время. блоха сидит на первом студенте. и за каждую секунду прыгает на следующего. программа должна вывести на каком студенте блоха окажется по окончании времени

В общем, вот Вам программа на Console Aplication:

var n, t, i, a:Integer;

begin

Writeln ('Vvedite kol-vo studentov') ;

Readln (n) ;

Writeln ('Vvedite kol-vo vremeni (sek) ') ;

Readln (t) ;

a:=1;

for i:=1 to t do

begin

a:=a+1;

if (a=n) then

begin

a:=0;

end;

if i=t then

begin

Writeln ('cherez ', (t), ' sek bloha bydet na ', (a), ' studente') ;

end;

end;

Readln;

end.

Всё работает, проверял.