Плеез, нужно 1. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 раз сместиться на (–2, –3) сместиться на (3, 4) конец сместиться на (–4, –2) какую команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение? 1) сместиться на (1, –1) 2) сместиться на (–3, –1) 3) сместиться на (–3, –3) 4) сместиться на (–1, 1) 2. чертёжнику был дан для исполнения следующий алгоритм: повтори 2 раз сместиться на (–3, –4) сместиться на (3, 3) сместиться на (1, –2) конец какую единственную команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение? 1) сместиться на (2, –6) 2) сместиться на (–6, 2) 3) сместиться на (6, –2) 4) сместиться на (–2, 6) 3. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 раз сместиться на (1, 3) сместиться на (–2, –5) конец сместиться на (4, 8) какую команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение? 1) сместиться на (–1, 2) 2) сместиться на (–1, –2) 3) сместиться на (1, –2) 4) сместиться на (–2, 1) 4. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 раз сместиться на (–2, –1) сместиться на (3, 2) сместиться на (2, 1) конец какую единственную команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение? 1) сместиться на (9, 6) 2) сместиться на (–6, –9) 3) сместиться на (6, 9) 4) сместиться на (–9, –6) 5. чертёжнику был дан для исполнения следующий алгоритм: повтори 4 paз команда1 сместиться на (3, 3) сместиться на (1,−2) конец сместиться на (−8, 12) после выполнения этого алгоритма чертёжник вернулся в исходную точку. какую команду надо поставить вместо команды команда1? 1) сместиться на (−2, −4) 2) сместиться на (4,−13) 3) сместиться на (2, 4) 4) сместиться на (−8, −16) 6. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 paз команда1 сместиться на (1, 3) сместиться на (1, −2) конец сместиться на (3, 9) после выполнения этого алгоритма чертёжник вернулся в исходную точку. какую команду надо поставить вместо команды команда1? 1) сместиться на (3, 4) 2) сместиться на (−5, −10) 3) сместиться на (−9, −12) 4) сместиться на (−3, −4) 7. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 paз команда1 сместиться на (3, 2) сместиться на (2, 1) конец сместиться на (−9, −6) после выполнения этого алгоритма чертёжник вернулся в исходную точку. какую команду надо поставить вместо команды команда1? 1) сместиться на (−6, −3) 2) сместиться на (4, 3) 3) сместиться на (−2, −1) 4) сместиться на (2, 1) 8. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 paза сместиться на (1, 1) сместиться на (2, 2) сместиться на (1, −3) конец какую команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение? 1) сместиться на (12, 0) 2) сместиться на (0, 12) 3) сместиться на (0, -12) 4) сместиться на (-12, 0) 9. чертёжнику был дан для исполнения следующий алгоритм: повтори 3 paз команда1 сместиться на (3, 3) сместиться на (1, −2) конец сместиться на (−6, 9) после выполнения этого алгоритма чертёжник вернулся в исходную точку. какую команду надо поставить вместо команды команда1? 1) сместиться на (−6, −12) 2) сместиться на (2, −10) 3) сместиться на (2, 4) 4) сместиться на (−2, −4)

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

alenaafaunova

06.11.2020 05:22

Напишите программу, которая в последовательности натуральных чисел определяет количество всех чисел, кратных 5. Программа получает на вход натуральные числа, количество введённых...

Nastyxas

30.11.2020 12:08

Запишите по три однозначных, двузначных и трехзначных числа, используя цифры 3,7,9. можно ли записать 77, 999? сколько всего трехзначных чисел можно составить с цифр 3,7,9?...

MariaWans07

24.09.2020 04:00

Pascal abc. решить по программированию в pascal. нужно именно само действие, как найти числа которые повторяются в трочках. сама звучит так: найти все числа, каждое из которых...

Olga08062003

28.09.2020 03:43

Производилась двухканальная (стерео) звукозапись с частотой дискретизации 64 кгц и 24-битным разрешением. в результате был получен файл размером 48 мбайт, сжатие данных не...

Kotikocerdechko

08.07.2022 07:03

Параграф 22, изучить, выполнить таблицу по параграфу ( Часть Африки /Раса/Расовые признаки/Народы) ОЧЕНЬ...

nastya02012007

07.06.2023 20:14

Второе название мезопитами?? хелп...

atopio

28.03.2022 20:26

ГЕОГРАФИЧ стороны от занаправления?8 10.Стороны горизонта и их определение на местности,1. Если вы стоите лицом к югу, то с какойнаходиться восточное, северное, юго-западное...

kovalenko171019

05.10.2022 17:39

Write an email to your English friend about: . what you usually/always/never do at school.• what you are doing now.Dear...Thanks foryouremailwrite soon!Best,...

P0SEYD0N

17.10.2022 03:11

Звуко-буквенный разбор слова птичьего, заранее...

melitatomashko

17.10.2022 03:11

В бутылке находятся подсолнечное масло массой 465г.Каков объём масла в этой бутылке...

Ответ:

FWEAAFE

20.08.2022 13:08

Задачка, конечно, простейшая, но и на ней можно проследить состояние изучения программирования в наших школах.

{ 1. Borland (Turbo) Pascal 7.0, 1994г., статический массив }

uses Crt;
const
nn=1000;
var
i,n,mn:integer;
a:array[1..nn] of integer;
begin
Randomize;
ClrScr;
Write('n='); Read(n);
mn:=1000;
for i:=1 to n do begin
    a[i]:=Random(199)-99;
    Write(a[i],' ');
    if a[i]<mn then mn:=a[i]
    end;
Writeln;
Writeln('Наим. элемент ',mn);
ReadKey
end.

Выполнение приведено во вложении 1.

// 2. Free Pascal 3.0.0, 2015г., динамический массив

uses Crt;
var
i,n,mn:integer;
a:array of integer;
begin
Randomize;
ClrScr;
Write('n='); Read(n);
SetLength(a,n);
mn:=1000;
for i:=0 to n-1 do begin
    a[i]:=Random(199)-99;
    Write(a[i],' ');
    if a[i]<mn then mn:=a[i]
    end;
Writeln;
Writeln('Наим. элемент ',mn);
ReadKey
end.

Выполнение приведено во вложении 2

// 3. PascalABC.NET 3.2, 2016г., современное решение

begin
var a:=ArrRandom(ReadInteger('n='),-99,99);
a.Println;
Writeln('Наим. элемент ',a.Min)
end.

Выполнение приведено во вложении 3.

Сделать выводы каждый может сам...

Примечание: все решения сделаны в среде PascalABC.NET 3.2, который для уровня школьных задач можно считать совместимым на уровне исходного текста с вышеприведенными версиями паскалей.

0,0(0 оценок)

Ответ:

tarasov78

14.09.2021 15:10

// PascalABC.NET 3.2, сборка 1379 от 21.01.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходный массив ***');
var a:=MatrRandom(5,5,-99,99);
a.Println(4);
var min5:=a.Row(4).Min;
for var i:=0 to 4 do
for var j:=0 to 4 do
if a[i,j].IsOdd then a[i,j]:=min5;
Writeln('*** Результирующий массив ***');
a.Println(4)
end.

Пример
*** Исходный массив ***
-65 20 -60 11 59
46 59 -28 65 -33
-34 37 73 -82 76
-57 68 26 85 82
44 -45 30 90 36
*** Результирующий массив ***
-45 20 -60 -45 -45
46 -45 -28 -45 -45
-34 -45 -45 -82 76
-45 68 26 -45 82
44 -45 30 90 36

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку