Var a,n: integer;
begin write('Введите a: ');
readln(a);
n:=352346543;
writeln(a,n,a);
<span>end.</span>
Будешь моей девушкой помагу
Видеокарта AMD Radeon HD 7970
Вправо закрась закрась влево вправо влево вправо вверх вниз закрась закрась вниз .вниз влево
<h3>в первом задании выйдет квадрат на две клетки.во втором задании 1-2,2-3,3-1.надеюсь понятно</h3>