М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
лев234325
лев234325
22.01.2023 19:15 •  Информатика

(ИНФОРМАТИКА) 1)Як команду повторень можна використати при складанні проектів у середовищі Скретч? Наведи приклади проектів.
2)Як можна змінити розташування виконавця на сцені проекту в середовищі Скретч?

👇
Открыть все ответы
Ответ:
boha3
boha3
22.01.2023

// П

uses Drawman;

begin

Field(3, 4);

ToPoint(1, 1);

PenDown;

OnVector(0, 2);

OnVector(1, 0);

OnVector(0, -2);

end.

// Б

uses Drawman;

begin

Field(3, 4);

ToPoint(1, 1);

PenDown;

OnVector(0, 2);

OnVector(1, 0);

PenUp;

ToPoint(1, 2);

PenDown;

OnVector(1, 0);

OnVector(0, -1);

OnVector(-1, 0);

end.

// Ч

uses Drawman;

begin

Field(3, 4);

ToPoint(1, 3);

PenDown;

OnVector(0, -1);

OnVector(1, 0);

OnVector(0, 1);

OnVector(0, -2);

end.

// Ц

uses Drawman;

begin

Field(25, 27);

ToPoint(5, 25);

PenDown;

OnVector(0, -20);

OnVector(15, 0);

OnVector(0, 20);

OnVector(0, -20);

OnVector(2, 0);

OnVector(0, -3);

end.

// Ш

uses Drawman;

begin

Field(4, 4);

ToPoint(1, 3);

PenDown;

OnVector(0, -2);

OnVector(2, 0);

OnVector(0, 2);

OnVector(0, -2);

Onvector(-1, 0);

OnVector(0,2);

end.

// E

uses drawman;

begin

Field(3, 4);

ToPoint(1, 1);

PenDown;

OnVector(0, 2);

OnVector(1, 0);

PenUp;

ToPoint(1, 2);

PenDown;

OnVector(1, 0);

PenUp;

ToPoint(1, 1);

PenDown;

OnVector(1, 0);

end.

(Если я тебя правильно понял то вот держи)

рад

4,5(36 оценок)
Ответ:
gulim1902
gulim1902
22.01.2023

Program nnatovna;
uses crt;
const n=13;
var
  a:array [1..n] of integer;
  i,min,max,temp:integer;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  randomize;
  writeln('Элементы массива:');
  {создание и вывод массива}
  for i:=1 to n do
    begin
      a[i]:=random(100)-50;
      write (a[i]:5);
    end;
{ищем номера мин и мах}
  min:=1;
  max:=1;
  for i:=1 to n do
    begin
      if a[min]>a[i] then min:=i;
      if a[max]<a[i] then max:=i;
    end;
{меняем местами мин и мах элементы}
  temp:=a[min];
  a[min]:=a[max];
  a[max]:=temp;    
{вывод результата}
  writeln();
  writeln('Результат:');
  for i:=1 to n do
    write(a[i]:5);
end.

4,7(76 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ