partners
?>

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

Информатика

Ответы

laleonaretouch
По моему это вперед. но я не уверена
uuks2012
Перо опустить , после этого он начнёт перемещатся выдовая чёткие контуры.
Ainura Pokhomova
Var  i: integer;  begin
for i:=1 to 9 do  write(i);  writeln(10);
for i:=0 to 8 do  write(i);  writeln(9);
for i:=1 to 2 do  write('0');  for i:=1 to 7 do  write(i);  writeln('8');
for i:=1 to 3 do  write('0');  for i:=1 to 6 do  write(i);  writeln('7');
for i:=1 to 4 do  write('0');  for i:=1 to 5 do  write(i);  writeln('6');
for i:=1 to 5 do  write('0');  for i:=1 to 4 do  write(i);  writeln(5);
for i:=1 to 6 do  write('0');  for i:=1 to 3 do   write(i);  writeln('4');
for i:=1 to 7 do  write('0');  for i:=1 to 2 do  write(i);  writeln(3);
for i:=1 to 8 do  write('0');  write('1');writeln('2');
for i:=1 to 9 do  write('0');  writeln(1);  
end.

Как сделать более кратко не знаю. Но эта программа работает.
papushinrv4985
Const
  nn = 20;

var
  i, j, n: integer;
  a: array[1..nn, 1..nn] of integer;

begin
  writeln('Задайте размер матрицы n');
  readln(n);
  if n > nn then
    writeln('Вы превысили допустимый размер матрицы 20')
  else begin
    writeln('Матрица-результат');
    for i := 1 to n do
    begin
      writeln;
      for j := 1 to n do begin
        if i < j then a[i, j] := 1
        else if i = j then a[i, j] := 2
        else a[i, j] := 3;
        write(a[i, j]:2)
      end;
    end;
    writeln
  end
end.

Тестовый пример:

Задайте размер матрицы n
10
Матрица-результат

 2 1 1 1 1 1 1 1 1 1
 3 2 1 1 1 1 1 1 1 1
 3 3 2 1 1 1 1 1 1 1
 3 3 3 2 1 1 1 1 1 1
 3 3 3 3 2 1 1 1 1 1
 3 3 3 3 3 2 1 1 1 1
 3 3 3 3 3 3 2 1 1 1
 3 3 3 3 3 3 3 2 1 1
 3 3 3 3 3 3 3 3 2 1
 3 3 3 3 3 3 3 3 3 2

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Какую команду нужно дать исполнителю чертежник, чтобы он при перемещении чертил линию на клетчатом поле. а)ширина пера б)перо опустить с) перо поднять д)вперед
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

mitin228133770
dailyan539
shelep19789
Эвелина
Ольга
rn3ay8
Шиловский126
Imarmy67
Galliardt Sergeevna1284
ksoboleva
okutihamv
lazareva
NataliaBerezovskaya33
nv6634
Kalmikova1666