Практическая по географии ​

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.

хай                                                                                                                                                                           

а столбчатая диаграмма

б график 

в ярусная диаграмма

г областная диаграмма

дкруговая диаграмма

виды алгоритмов по способу записи 

1)текстовый

2)графический.

виды алгоритмов по последовательности исполнения шагов-команд

1)линейный

2)разветвляющийся