Нарисуйте следующее действие поворота фигуры

2 var  3 s: string;   4 begin  5  readln(s); 6  while  pos('с',s)> 0  do  delete(s,pos('с',s),1); 7writeln(s);   8 end.это точно

jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf

теперь не плагиат

program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.

по центру каждой стены  по  стулу  а также в каждый угол по стулу