Этапы ОТЛАДКА и ТЕСТИРОВАНИЕ программ (информатика)

a в квадрате плюс b в квадрате:  

;

var ch,n,i: longint;

ch1,s: string;

begin

  read(s,ch);

  n: =length(s);

  writeln(n,' ',ch);

  str(ch,ch1);

  for i: =1 to n do if s[i]=ch1 then write(i,' ');

end.

это идут дедешка папа и сын.дедушка папа своиму сынку а его сын папа своему сыну папа сын своего дедушки сын сын своему папе!

5`120`000 бит =  640 000 байт = 625 кб