Есть ответ 👍

Написать программы в паскале • дан массив из n вещественных чисел. поменять местами последний и минимальный элементы массива. • дан массив из n целых чисел. найти номер первого элемента, который равен количеству элементов, кратных 3.

202
303
Посмотреть ответы 2

Ответы на вопрос:


Program task1; const   n = 10; var   a : array [1..n] of real;   i, j : integer;   min, k : real; begin   for i: = 1 to n do       readln(a[i]);     min: = a[1];   for i: = 1 to n do       if a[i] < min then       begin           min: = a[i];           j: = i;       end;         k: = a[n];   a[n]: = a[j];   a[j]: = k; end. program task2; const   n = 10; var   a : array [1..n] of integer;   i, j, kol : integer; begin   for i: = 1 to n do       readln(a[i]);     kol: = 0;   for i: = 1 to n do       if a[i] mod 3 = 0 then           inc(kol);   for i: = 1 to n do       if a[i] = kol then       begin           j: = i;           break;       end;   writeln(j); end.
grek1990
4,5(72 оценок)

ответ:"objName": "Stage",

"lists": [{

  "listName": "dummy",

  "contents": [],

  "isPersistent": false,

  "target": "Stage",

  "x": 5,

  "y": 5,

  "width": 102,

  "height": 202,

  "visible": true

 }],

"sounds": [{

  "soundName": "pop",

  "soundID": 0,

  "md5": "83a9787d4cb6f3b7632b4ddfebf74367.wav",

  "sampleCount": 258,

  "rate": 11025,

  "format": ""

 }],

"costumes": [{

  "costumeName": "backdrop1",

  "baseLayerID": 3,

  "baseLayerMD5": "790f7842ea100f71b34e5b9a5bfbcaa1.svg",

  "rotationCenterX": 240,

  "rotationCenterY": 180

 }],

"currentCostumeIndex": 0,

"penLayerMD5": "279467d0d49e152706ed66539b577c00.png",

"tempoBPM": 60,

"children": [{

  "objName": "Scratch Cat",

  "scripts": [[53,

    47.8,

    [["procDef", "Fill %s with %s , %n times", ["list", "a", "n"], ["", "", 1], true],

     ["doRepeat", ["getParam", "n"], [["append:toList:", ["getParam", "a"], "dummy"]]]]]],

  "sounds": [{

    "soundName": "pop",

    "soundID": 0,

    "md5": "83a9787d4cb6f3b7632b4ddfebf74367.wav",

    "sampleCount": 258,

    "rate": 11025,

    "format": ""

   }],

  "costumes": [{

    "costumeName": "costume1",

    "baseLayerID": 1,

    "baseLayerMD5": "f9a1c175dbe2e5dee472858dd30d16bb.svg",

    "rotationCenterX": 47,

    "rotationCenterY": 55

   },

   {

    "costumeName": "costume2",

    "baseLayerID": 2,

    "baseLayerMD5": "6e8bd9ae68fdb02b7e1e3df656a75635.svg",

    "rotationCenterX": 47,

    "rotationCenterY": 55

   }],

  "currentCostumeIndex": 0,

  "scratchX": 0,

  "scratchY": 0,

  "scale": 1,

  "direction": 90,

  "rotationStyle": "normal",

  "isDraggable": false,

  "indexInLibrary": 1,

  "visible": true,

  "spriteInfo": {

Объяснение:

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS