Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (a, b) (где a, b – целые числа), перемещающую чертёжника из точки с координатами (x, y) в точку с координатами (x + a, y + b). если числа a, b положительные, значение соответствующей координаты увеличивается, если отрицательные – уменьшается. например, если чертёжник находится в точке с координатами (4, 2), то команда сместиться на (2, –3) переместит чертёжника в точку (6, –1). запись
повтори k раз
команда1 команда2 команда3
конец
означает, что последовательность команд команда1 команда2 команда3 повторится k раз.
чертёжнику был дан для исполнения следующий алгоритм:
повтори 2 раза
команда1 сместиться на (1, 3) сместиться на (1, -2) конец сместиться на (2, 6)
после выполнения этого алгоритма черчежник вернулся в исходную точку. какую команду надо поставить вместо команды команда1?

1.                                                                        

program raf105;

var n,m,i:integer;

begin

writeln('Введите диапазон чисел (2 числа через пробел) которые нужно возвести в квадрат');

readln(n,m);

writeln('Вывод:');

for i:=n to m do

 writeln(i**2)

end.

2.                                                                        

program raf105;

var a,b,kol1,kol2:integer;

begin

write('Введите число: ');

readln(a);

while a <> 0 do

begin

 b:= a mod 10;

 if b<>0

   then if (b mod 2)=0

     then kol1+= 1

     else kol2+= 1;

 a:= a div 10;

end;

writeln('В числе ',kol1,' чётных и ',kol2,' нечётных цифр');

end.

3.                                                                        

program raf105;

var n,i,kol:integer;

begin

write('Введите N: ');

readln(n);

for i:=1 to n-1 do

 if ((i mod 2)<>0) and ((i mod 3)<>0) and ((i mod 5)<>0)

   then kol+=1;

writeln('Вывод: ',kol);

end.

Язык PascalABC

1. Программный код часто разбивается на несколько файлов, каждый из которых компилируется отдельно от остальных. Такая модульность программного кода позволяет значительно уменьшить время перекомпиляции при изменениях, вносимых лишь в небольшое количество исходных файлов, и упрощает групповую разработку.

2. Программа будет работать, но результат не будет записан в выходной файл.

3. Можно использовать как print, так и write

4. assign(f); rewrite(f);reset(f);

write(f);

append(f);

close(f);

read(f);

eof(f);

eoln(f);

erase(f);

rename(f);

Объяснение: