Pascal
для массива x из 30 элементов найти наибольший элемент, после чего нормировать все элементы массива, поделив их значения на значение наибольшего элемента. Значение наибольшего элемента, его номер вывести на экран.
Pascal
для массива x из 30 элементов найти наибольший элемент, после чего нормировать все элементы массива, поделив их значения на значение наибольшего элемента. Значение наибольшего элемента, его номер вывести на экран.
Найти наименьший из элементов, расположенных правее максимального элемента массива.
Вместо наименьшего элемента выводит последний. Помогите исправить.
const n=10;
var
a:array[1.n] of integer;
i,j,max,minp:integer;
begin
write(‘Массив ‘);
for i:=1 to n do begin
a[i]:=random(100);
write(a[i]:4);
end;
writeln;
write(‘Максимальный элемент ‘);
max:=0;
imax:=0;
for i:=1 to n do
if (a[i]>max) then begin
max:=a[i];
j:=i;
end;
writeln(max);
minp:=0;
for i:=j to n do
if (a[i] minp:=a[i];
write(‘Наименьший элемент правее максимального ‘,minp);
end.
Напишите программу поиска максимального элемента в числовом массиве из 30 различных элементов.
сформировать одномерный массив из n элементов найти сумму тех элементов массива которые одновременно имеют четные и положительные значения.элементы вводятся с клавиатуры. Написать программу в pascale! Сделать в масиве
Вывести массив, состоящий из 12 элементов действительного типа, Расположить элементы в порядке убывания. Вычислить сумму максимального и минимального элементов массива.
C++ помогите пожалуйста.
Написать код в Pascal.
Задача: Сформулировать и вывести на экран в виде таблицы массив A[1.4,1.6], заполнив его целыми случайными числами из интервала [30,75]
Найти среднее арифметическое каждого столбца.
Дам 40 балов
1)Заполнить массив случайным образом и вывести на экран только четные элементы
2)В двумерном массиве действительных чисел найти количество положительных элементов меньших 10
3)Заменить к-й элемент одномерного массива на X Если этот элемент положительный и на y если он отрицательный
Определить Двумерный массив и выполнить следующие вычисления:
1. Максимальный элемент Двумерного массива.
2. Сумму элементов двумерного массива, расположенных до последнего положительного элемента.
1 найти наибольший из заданных трех элементов
2 выяснить является ли треугольник прямоугольным по заданным трем сторонам
(паскаль)
даю 35 балов
11. Дан одномерный массив из 6 элементов, взятых случайным образом из диапазона от 1 до 100. Напишите программу на одном из языков программирования для нахождения значения и номера максимального элемента в массиве.
ПАСКАЛЬ. Создать двумерный массив, ввести с клавиатуры значения и отсортировать их в порядке возрастания
Помогите решить. Надо написать на языке паскаль 7 вариант
Скільки разів буде виконано цикл
for x in range (5, -2, -2) ?
1) 7
2) 4
3) 5
4) жодного разу
Артур составляет 5-буквенные коды из букв А, П, О, Р, Т. Каждую букву нужно использовать ровно один раз, при этом нельзя ставить рядом две гласные. Сколько различных кодов может составить Артур?
Напишите с объяснением, пожалуйста
Решите задачу.
У исполнителя имеется две команды:
1. Прибавить 3
2. Отнять 1
Какое минимальное количество команд необходимо выполнить исполнителю для получения числа 9 из числа 2 Выберите один ответ:
a.5
b.2
c.7
d.3
Write a program that lets you know if you can have a key or not, based on your role at the school.
First ask for the user’s role at the school. They can be a student, administrator, or a teacher. (And remember that capitalization is important! ‘Student’ is not the same as ‘student’.)
Example 1: Administrator or Teacher
For example, if this was the input:
Are you an administrator, teacher, or student?: teacher
This should be the output:
Administrators and teachers get keys!
Example 2: Student
And if this was the input:
Are you an administrator, teacher, or student?: student
This should be the output:
Students do not get keys!
(Note: You should also be able to handle a situation where the user enters a value other than administrator, teacher or student and tell them they must be one of the three choices!)
Example 3: Other
If they input anything else:
Are you an administrator, teacher, or student?: secretary
This should be the output:
You can only be an administrator, teacher, or student!
РЕШИТЕ ЗАДАЧУ ПО ИНФОРМАТИКЕ В excel
Во время каникул Незнайка решил поработать продавцом газет и проработал целую неделю. За каждый проданный экземпляр газеты «Известия Цветочного города» он получал 10 монет. За каждый экземпляр «Технической газеты Винтика и Шпунтика» — 7 монет. За каждый экземпляр «Медицинских новостей доктора Медуницы» — 8 монет. В понедельник он продал 8 экземпляров Известий, 7 экземпляров Технической газеты и 5 экземпляров Медицинских новостей. Во вторник было продано 13 экземпляров Известий, 4 экземпляра Технической газеты и 8 экземпляров Новостей. В среду — 10 Известий, 10 Технических и 12 Новостей. В четверг — 8 Известий, 7 Технических газет и 15 Медицинских новостей. В пятницу — 10 штук Известий, 5 штук Технических и 8 штук Медицинских. В субботу — 9 Известий, 13 Технических газет и 8 Медицинских новостей. В воскресенье — 5 экземпляров Известий, 6 экземпляров Технической и 9 экземпляров Медицинской.
Сколько экземпляров каждой газеты Незнайка продавал за каждый день недели и сколько — за всю неделю; сколько денег он зарабатывал за каждый день недели и сколько — за всю неделю; сколько денег он получал за продажу каждой газеты за всю неделю?
КАКУЮ ФОРМУЛУ НАДО ПИСАТЬ В ПУСТЫХ ЯЧЕЙКАХ? (Знаю, что должна быть формула Сумма произведений) ПИШИТЕ ФОРМУЛУ ПОДРОБНО, ПОЖАЛУЙСТА
Пацаны срочно будет ли звуковой сигнал загрузки биос без видеоядра?
Що таке «висловлювання» в інформатиці?a.
Це думка, яку може висловлювати людина
b.
Це речення, яке містить твердження про певний об’єкт або про зв’язки між об’єктами
c.
Фрагмент алгоритму, який містить послідовність команд, яка виконуватиметься вказану кількість разів
d.
Алгоритм, який обирає сценарій роботи в залежності від умови
Сместиться на (—12,16) Повтори 4 раза Сместиться на (а, Ъ) Сместиться на (—3,1) Сместиться на (2, —2) конец
Дан целочисленный массив . Найти индекс максимального элемента.
===== PascalABC.NET =====
begin
var x := ArrRandomReal(30, -99, 99);
x.Transform(p -> Round(p, 1));
x.Println;
var imax := x.IndexMax;
var xmax := x[imax];
Println(‘Max =’, xmax, ‘ его номер’, imax + 1);
x.Transform(p -> p / xmax);
x.Println
end.