041208katy
01.10.2022 20:46

с маткадом
Вот ссылка на методичку http://irbis.bti.secna.ru/doc8/2018-157.pdf 2,3 и 4 лабы
1. Используя стандартную функцию rnd(1), определите новую функцию F(a,b), которая возвращает случайные числа в диапазоне a…b.

2. Дано число. Если оно четное, увеличить его в два раза, если нечетное – в три

раза. Используйте стандартные функции if и mod

3. Решите задачу о случайном блуждании, но на плоскости x-y (за аналог возьмите

задачу 1): пешеход может двигаться только вперед-назад и влево-вправо. Постройте график его траектории и отметьте место его остановки. Как далеко он смог отойти от начального места?

1. Определите любыми двумя вектор W, содержащий все нечетные

числа от 1 до 19.

2. Определите некоторые векторы V, V1, V2, скаляр X и проделайте над ними

векторные операции, приведенные в таблице 4.2.

3. Определите вектор x = (0.12, 0.2, 0.23, 0.27, 0.45, 0.66, 0.7, 0.85, 0.9, 0.99). Рассчитайте значения

Определите некоторые матрицы M, M1, M2, вектор V и скаляр X. Проделайте

над ними матричные операции, приведенные в таблице 4.3.

6. Определите два вектора одинаковой размерности. Объедините их в матрицу,

отсортируйте по первому столбцу и получите из матрицы вновь два вектора.

7. Определите единичную матрицу Е размером 4×4 и вектор V, содержащий четыре элемента. Вычислите матрицу

 

T VV

V

H E 2

2

  .

8. Решите задачу 1 из п.4.4 о поиске оптимального расположения домика садоводства при количестве домов > 50. Изобразите на графике все дома садоводства, выделив

дом с оптимальным и самым неудачным расположением.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Косинус08111
16.03.2023 05:44
// PascalABC.NET 3.1, сборка 1267 от 10.07.2016
begin
  Writeln(17*'_','.888888888.');
  Writeln(17*'_','88"P""T"T888_8o');
  Writeln(13*'_','o8o_8.8"8_88o."8o_8o');
  Writeln(12*'_','88_._o88o8_8_88."8_88P"o');
  Writeln(11*'_','88_o8_88_oo.8_8 88_8_888_88');
  Writeln(11*'_','88_88_88o888"_88"__o888_88');
  Writeln(11*'_','88."8o."T88P.88"._88888_88');
  Writeln(11*'_','888."888."88P".o8_8888_888');
  Writeln(11*'_','"888o"8888oo8888_o888_o8P"');
  Writeln(12*'_','"8888. ""888P"P.888".88P');
  Writeln(13*'_','"88888ooo__888P".o888');
  Writeln(15*'_','""8P"".oooooo8888P');
  Writeln(6*'_','.oo888ooo.____8friga888P8');
  Writeln('____o88888"888"88o.__"8888"".8f___.oo888o o..');
  Writeln('_____8f88"_"88_88888._______8r".o88888888" 888.');
  Writeln('_____"8r88o.""o_88"88o.____oi".888"888" 88_"88P');
  Writeln(6*'_','T8i8C.oo._"8."8"8___og"o888_o88"_" .=888"');
  Writeln(7*'_','88g88888o_"8_8_8__.a_.8"88_8"".o888 o8P');
  Writeln(8*'_','"8a88C.o8o__8_8__8"_8_o"_...o""" 8888');
  Writeln(10*'_','"88888888_"_8_.8__8___88888888888 "');
  Writeln(12*'_','"8888888o__.8o="_o8o..o(8oo88".');
  Writeln(16*'_','"888"_88"____88FRIGA88"".');
  Writeln(20*'_','o8P_______"888"""');
  Writeln(14*'_','...oo88');
  Writeln('_____"8oo...oo888""')
end.

Составьте программу вывода на экран рисунка, построенного из различных символов. плз умоляю не могу
0,0(0 оценок)
Ответ:
vlados546712
16.03.2023 05:44
//Мона Лиза
//Pascal ABC.NET 3.1 сборка 1256

begin
writeln('i`it)v|(//s+)`(-\\/[email protected]dmKK(c!(/-[2=/cct/!-v\!_L\)|',chr(10),chr(13),']-!/(!-)\L\)v|c5(!,[email protected]dK/]!c\\\v|i\/cT\v((c-',chr(10),chr(13),']!`/v\//(-|t\[email protected][email protected]bLt\\|)c/2-vv)/it\.',chr(10),chr(13),'--/-,\,\v\,|)/v/[email protected][email protected]bK!v!-( )-!.[/cT',chr(10),chr(13),'.//.\--.--|-/c([email protected][email protected]s-||/v!c\.',chr(10),chr(13),'-,-|\`||\-\/[email protected][email protected]b.),`-,-/c-`i',chr(10),chr(13),'!,\[email protected]P[+~**[email protected]b/./`c-/.\7-',chr(10),chr(13),'--..-- -/,[email protected]@@*P!`          \[email protected]i.\\..\.c',chr(10),chr(13),',`,`\.-,[email protected]@5`-           -- `[email protected][email protected]_\-|-\c-',chr(10),chr(13),'. -.,`/[email protected]@K- `               - )[email protected]c/',chr(10),chr(13),'- `-  [email protected]@Ai                    [email protected]b! \`|-`',chr(10),chr(13),' `-,.- [email protected]@@[,                    [email protected][/-,-/.',chr(10),chr(13),'-` .-/[email protected]@@A)                      -)[email protected]\. _\',chr(10),chr(13),'- ` ,[email protected]@@!                     .-!([email protected][(/s[.',chr(10),chr(13),'  - i\[email protected]@@Z-                    . ! [email protected])(4)`',chr(10),chr(13),' , -|[email protected]@@@!\                     .  ` |[email protected]XNYZ-',chr(10),chr(13),'   [email protected]@@@A-,                        .  `)([email protected]D)8A[',chr(10),chr(13),'   )[email protected]\                         ,-.-/[email protected][email protected][',chr(10),chr(13),'  ]][email protected]@@@d|-              ,ii.c,, [email protected][email protected](@8[',chr(10),chr(13),'  [email protected]( .i!vGG_      [email protected]@[email protected][email protected][email protected]',chr(10),chr(13),' )/[email protected]@@[email protected]@dP~~~T4(    [email protected]@7`[email protected][email protected]@@[email protected]LM8[',chr(10),chr(13),'\[email protected][email protected]@d*@@@bVi   [email protected]*ff/\[email protected][email protected][',chr(10),chr(13),',\[email protected]@@[email protected]~t` !*~!`.  -MA)    .~..).` `,[email protected]AKb[',chr(10),chr(13),',`[email protected] -`,,gvZ``    A//-  ..c\+\`    i][email protected][email protected]8[',chr(10),chr(13),'i\@[email protected]@@@D              \!.             [email protected]@@[email protected][email protected]@@@8M[',chr(10),chr(13),'[email protected]             .!-             .-)[email protected]M8i',chr(10),chr(13),'[email protected]-             v  ,          ,\[email protected][email protected]Z2|',chr(10),chr(13),'@[email protected]@@@[email protected][              //           [email protected]@@[email protected]@[email protected]@[email protected]@@[email protected]@@bmi',chr(10),chr(13),'@@[email protected]@[email protected]@@P-            -=/.         /[email protected][email protected]@@[email protected]@[',chr(10),chr(13),'@[email protected]@@[email protected]@@@\-      .   _)g2i        -(([email protected][email protected]@@@[email protected]@[email protected]K[',chr(10),chr(13),'@@@[email protected]@[email protected]@)i     .c,,[email protected]@bK       )X)[email protected]@@[email protected]@@[email protected]@[email protected][email protected][',chr(10),chr(13),'@[email protected][email protected]/i-     [email protected]@@@Mc    .,\c=)[email protected]@[email protected]@@[email protected][email protected]@A[',chr(10),chr(13),'[email protected](.c\`     PPK((,i]v|-\-v)[email protected][email protected]@[email protected][',chr(10),chr(13),'@@[email protected]@[email protected]@[email protected]!--c)s_, ,([email protected]\`- .-N]/[email protected][email protected]@@[email protected][email protected][',chr(10),chr(13),'@@[email protected]@@[email protected]@@@/-  !''~~Vff*N5f -` -,\))[email protected][email protected]@[email protected]@@[email protected]@@@[',chr(10),chr(13),'@[email protected]@@[email protected]2--    ,,_JJ/i)/- |/v)[email protected][email protected][email protected][',chr(10),chr(13),'@@[email protected]@@@[email protected]d!,   .VV\)\\)\7(-)[email protected]@[email protected]@@[email protected][email protected][',chr(10),chr(13),'[email protected]@@@[email protected]@[email protected]@@@[email protected]       `-\\/v)[email protected]@[email protected]@@[email protected]@@[email protected]@[email protected]@@[email protected]@[email protected][',chr(10),chr(13),'[email protected]@[email protected]m       -)!/[email protected]@@[email protected][email protected][email protected]@@[email protected]@@[',chr(10),chr(13),'[email protected]@[email protected][email protected]@[email protected]Ks   ,-/[email protected]@[email protected][email protected][email protected]@@[email protected]@[email protected][',chr(10),chr(13),'[email protected]@@[email protected]@[email protected][email protected]@@[email protected]@[email protected]@@@[email protected]@@@[email protected][email protected][',chr(10),chr(13),')[email protected]@@[email protected]@@[email protected][email protected]@[email protected]@[email protected]@[email protected][email protected]@[email protected]@[email protected]@@@[email protected]@[email protected]@@@[',chr(10),chr(13),'([email protected]@@[email protected]@[email protected]@@@[email protected]@@@[email protected]@@[email protected][email protected]@@@[email protected]@[email protected]M[',chr(10),chr(13),'[email protected]@[email protected]@@[email protected]@@@[email protected][email protected]@@/[email protected]@[email protected]@@[email protected]@[email protected]@[email protected]@[email protected][email protected][',chr(10),chr(13),'M/[email protected]@@[email protected]@@[email protected][|t*[email protected][email protected]@[email protected]@@@[email protected][email protected]@@[email protected][',chr(10),chr(13),'[email protected][email protected]D.\.([email protected]@[email protected][email protected]@[',chr(10),chr(13),'[email protected]@[email protected][email protected]..-!/))ZK5AK4)AY(/XY/[email protected]@@[email protected]@@[email protected]@@[email protected]@@@[',chr(10),chr(13),'[email protected]@[email protected]@[email protected]@@[email protected]L,-,\!]]\X(5)Z/7c\\t5/[email protected][email protected][',chr(10),chr(13),'[email protected]@@[email protected]@@[email protected]@[email protected]KDLt! !,-|t.(-\\!,\/,\[email protected]@@[email protected]@@@[email protected]@@[',chr(10),chr(13));
end.

//Во вложении I3artle, авторский персонаж
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота