Приготовить кашу из топора в виде блок схемы

началоположить топор в воду закипятить посолить добавить крупы добавить масла съесть кашу, а топор оставить, чтобы доварить в следующий раз

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.

var alpha: real;

begin

  read(alpha);

  if alpha > 90 then write("tupougolnyj");

  if alpha = 90 then write("prjamougolnyj");

  if alpha < 90 then write("ostrougolnyj");

end.