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

1. дан массив x (20), заполненный датчиком случайных чисел в диапазоне от -50 до 50 включительно. сформировать новый массив из положительных элементов массива х. в новом массиве найти максимальный и минимальный элементы массива и поменять их местами.

👇
Ответ:
Ivanuk13102000
Ivanuk13102000
10.08.2022
Программа и пример её работы - в прилагаемом файле
4,4(44 оценок)
Открыть все ответы
Ответ:
dostovalovaanast
dostovalovaanast
10.08.2022
В той же папке, где будет программа, создаете два блокнота, называете input и output
a:array[1..10000] of integer;
i, k, min, imin:integer;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt'); { если в тот же, то assign(input,'input.txt');
rewrite(output);                     rewrite(input);}
for i:=1 to 10 do
read(a[i]);
min:=a[1];
for i:=1 to 10 do
if min>a[i] then begin min:=a[i]; imin:=i; end;
writeln;
writeln(min,' ', imin); 
end.
задание вписать в тот же файл делаю впервые, поэтому за правильность вывода не отвечаю.
4,8(4 оценок)
Ответ:
2254wearвика
2254wearвика
10.08.2022
Означает примерно следующее:
После нажатия на кнопку Button1 будет проверено содержимое элементов от edit1 до edit6. Если хотя бы в одном ничего не написано, то будет выведено сообщение 'Пусті значення недопустимі' и работа программы закончится. Если все они заполнены, то
в эт-т edit7 запишется произведение чисел, нах-ся в edit1 и edit2,
в эт-т edit10 запишется число, равное , числу из edit7 /100 * 13,
в эт-т edit13 запишется число, равное разности чисел из edit7 и edit10,
в эт-т edit8 запишется произведение чисел, нах-ся в edit2 и edit5,
в эт-т edit11 запишется число, равное , числу из edit8 /100 * 13,
в эт-т edit14 запишется число, равное разности чисел из edit8 и edit11,
в эт-т edit9 запишется произведение чисел, нах-ся в edit3 и edit6,
в эт-т edit12 запишется число, равное , числу из edit9 /100 * 13,
в эт-т edit15 запишется число, равное разности чисел из edit9 и edit12,
в эт-т edit16 запишется число, равное сумме чисел из edit13, edit14 и edit15
Надеюсь, ничего не перепутал, а то прям в глазах зарябило от этого текста)))
4,5(90 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ