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

Исполнитель чертёжник перемещается на координатной плоскости, оставляя след в виде линии. чертёжник может выполнять команду сместиться на (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 раз. чертёжнику был дан для исполнения следующий алгоритм: повтори 4 раз сместиться на (–2, –1) сместиться на (3, 2) сместиться на (2, 1) конец какую единственную команду надо выполнить чертёжнику, чтобы вернуться в исходную точку, из которой он начал движение?

👇
Ответ:
(x;y)=((-2+3+2)*4;(-1+2+1)*4)=(12;8)
ответ:(-12;-8)
4,4(96 оценок)
Открыть все ответы
Ответ:
Adella1207
Adella1207
07.05.2023

type z=array of byte;

var i,a,b,s: integer;

digits: z;

f: text;

begin

assign(f,'input.txt');

reset(f);

read(f,a);

read(f,b);

close(f);

s:=a+b;

i:=0;

while(s>0) do

begin

setlength(digits,i+1);

digits[i]:=s mod 10;

s:=s div 10;

i:=i+1;

end;

for i:=0 to length(digits)-2 do

for b:=0 to length(digits)-i-2 do

if (digits[b] > digits[b+1]) then

begin

a:= digits[b];

digits[b] := digits[b+1];

digits[b+1] := a;

end;

if(digits[0]=0) then for i:=0 to length(digits)-1 do

if(digits[i]<>0) then

begin

digits[0]:=digits[i];

digits[i]:=0;

break;

end;

assign(f,'output.txt');

rewrite(f);

for i:=0 to length(digits)-1 do write(f,digits[i]);

close(f);

end.

4,7(45 оценок)
Ответ:
vikfffff
vikfffff
07.05.2023

javascript:var матрица = [];

for (let сч1 = 0; сч1 < 5; сч1++) { матрица.push([]); for (let сч2 = 0; сч2 < 5; сч2++) матрица[сч1].push(Math.random() * 100 | 0); }

var мин = матрица[0][0], н_мин = 0, макс = мин, н_макс = 0;

for (let сч = 1; сч < 5; сч++) if ( let зн_г = матрица[сч][сч], зн_в = матрица[сч][4 - сч]; if (зн_г < мин) { мин = зн_г; н_мин = сч; } else if (зн_в > макс) { макс = зн_в; н_макс = сч; }  )

if (н_мин == 2 && н_макс == 2) for (let сч = 0; сч < 5; сч++) { матрица[сч][сч] = макс; матрица[сч][4 - сч] = макс; }

else { матрица[н_мин][н_мин] ^= матрица[н_макс][н_макс];  матрица[н_макс][н_макс] ^= матрица[н_мин][н_мин];  матрица[н_мин][н_мин] ^= матрица[н_макс][н_макс]; }


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