eligi2345

23.08.2020 09:18

Информатика

Есть ответ 👍

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

202

303

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

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

Аленчик310805

Информатика

4,8(44 оценок)

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

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

Задай свой вопрос

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

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

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

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

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

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

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