|
Задачи с массивами
|
|
еще несколько задач,пожалуйста:
1)Формат входных данных
Сначала задано число N - количество элементов в массиве. Далее через пробел записаны N чисел - элементы массива.
Формат выходных данных
Необходимо вывести количество элементов массива, которые больше предыдущего элемента в этом массиве.
2)Напишите программу, которая определяет, есть ли в данном массиве два соседних элемента с одинаковыми знаками.
Формат входных данных
Сначала задано число N - количество элементов в массиве. Далее через пробел записаны N чисел - элементы массива. Массив содержит только ненулевые числа.
Формат выходных данных
Программа должна вывести YES, если есть два соседних элемента с одинаковыми знаками, и NO – иначе.
|
|
|
|
1)
var
a:array[1..1000]of integer;
i,n,count:integer;
begin
read(n);
for i:=1 to n do
read(a[i]);
for i:=2 to n-1 do
if a[i]>a[i-1] count:=count+1;
writeln(count);
end.
2)
var
var
a:array[1..1000]of integer;
i,n:integer;
l:boolean;
begin
l:=false;
read(n);
for i:=1 to n do
read(a[i]);
for i:=1 to n-1 do
if (a[i]>0 and a[i+1]>0) or (a[i]<0 and a[i+1]<0) then begin
l:=true;break;end;
if l then writeln('YES') else writeln('NO');
end.
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
|
Пожалуйста,помогите решить в Паскале:
1)Дано число n, n <= 100 . Создайте массив n×n и заполните его по следующему правилу:
- числа на диагонали, идущей из правого верхнего в левый нижний угол, равны 1;
- числа, стоящие выше этой диагонали, равны 0;
- числа, стоящие ниже этой диагонали, равны 2.
Формат входных данных
Программа получает на вход число n.
Формат выходных данных
Необходимо вывести полученный массив. Числа разделяйте одним пробелом.
Примеры
Входные данные
4
Выходные данные
0 0 0 1
0 0 1 2
0 1 2 2
1 2 2 2
2)Проверьте, является ли двумерный массив симметричным относительно главной диагонали. Главная диагональ — та, которая идёт из левого верхнего угла двумерного массива в правый нижний.
Формат входных данных
Программа получает на вход число n<= 100, являющееся числом строк и столбцов в массиве. Далее во входном потоке идет n строк по n чисел, являющихся элементами массива.
Формат выходных данных
Программа должна выводить слово yes для симметричного массива и слово no для несимметричного.
Пример
Ввод
3
0 1 2
1 2 3
2 3 4
Вывод yes
3)В метании молота состязается n спортcменов. Каждый из них сделал m бросков. Победителем считается тот спортсмен, у которого сумма результатов по всем броскам максимальна.
Если перенумеровать спортсменов числами от 0 до n-1, а попытки каждого из них – от 0 до m-1, то на вход программа получает массив A[n][m], состоящий из неотрицательных целых чисел. Программа должна определить максимальную сумму чисел в одной строке и вывести на экран эту сумму и номер строки, для которой достигается эта сумма.
Формат входных данных
Программа получает на вход два числа n и m, являющиеся числом строк и столбцов в массиве. Далее во входном потоке идет n строк по m чисел, являющихся элементами массива.
Формат выходных данных
Программа должна вывести 2 числа: сумму и номер строки, для которой эта сумма достигается. Если таких строк несколько, то выводится номер наименьшей из них. Не забудьте, что нумерация строк (спортсменов) начинается с 0.
Пример
Ввод
4 3
5 6 7
6 6 7
7 6 6
4 3 5
Вывод
19 1
|
|
|
|
Пожалуйста,очень нужна помощь,помогите решить 3 задачи:
1)В метании молота состязается n спортcменов. Каждый из них сделал m бросков. Победителем соревнований объявляется тот спортсмен, у которого максимален наилучший результат по всем броскам. Таким образом, программа должна найти значение максимального элемента в данном массиве, а также его индексы (то есть номер спортсмена и номер попытки).
Формат входных данных
Программа получает на вход два числа n и m, являющиеся числом строк и столбцов в массиве. Далее во входном потоке идет n строк по m чисел, являющихся элементами массива.
Формат выходных данных
Прогhамма выводит значение максимального элемента, затем номер строки и номер столбца, в котором он встречается. Если в массиве несколько максимальных элементов, то нужно вывести минимальный номер строки, в которой встречается такой элемент, а если в этой строке таких элементов несколько, то нужно вывести минимальный номер столбца. Не забудьте, что все строки и столбцы нумеруются с 0.
Пример
Ввод Вывод
4 3 5
1 4 2 1 0
5 2 5
5 1 4
1 2 4
2)В метании молота состязается n спортcменов. Каждый из них сделал m бросков. Побеждает спортсмен, у которого максимален наилучший бросок. Если таких несколько, то из них побеждает тот, у которого наилучшая сумма результатов по всем попыткам. Если и таких несколько, победителем считается спортсмен с минимальным номером. Определите номер победителя соревнований.
Формат входных данных
Программа получает на вход два числа n и m, являющиеся числом строк и столбцов в массиве. Далее во входном потоке идет n строк по m чисел, являющихся элементами массива.
Формат выходных данных
Программа должна вывести одно число - номер победителя соревнований. Не забудьте, что строки (спортсмены) нумеруются с 0.
Пример
Ввод Вывод
4 3 2
8 8 8
5 9 3
9 4 7
6 6 2
3)В метании молота состязается n спортcменов. Каждый из них сделал m бросков. Победитель определяется по лучшему результату. Определите количество участников состязаний, которые разделили первое место, то есть определите количество строк в массиве, которые содержат значение, равное наибольшему.
Формат входных данных
Программа получает на вход два числа n и m, являющиеся числом строк и столбцов в массиве. Далее во входном потоке идет n строк по m чисел, являющихся элементами массива.
Формат выходных данных
Программа должна вывести одно число - количество победителей соревнования.
Пример
Ввод Вывод
4 3 2
1 2 3
4 5 6
6 2 5
2 3 4
|
|
|
|
Добрый день! помогите решить задания.
1)Дан целочисленный массив из 23 элементов, заданныхслучайным образом. Вывести все содержащиеся в данном массиве нечетныечисла в порядке возрастания, а также их количество К.
2) Дан целочисленный массив из 18 элементов, заданных случайнымобразом. Вывести его элементы с нечетными номерами в порядке убывания.
3) Данцелочисленный массив из 25 элементов, заданных случайным образом. Найти среднее
арифметическое его нечетных элементов. Вывести массив и среднее арифметическое
на форму. Для вычисления среднего арифметического создать функцию.
|
|
|
|
Напишите пожалуйста программу на языке Паскаль, я студент и в массивах полный ноль, заранее большое спасибо!
Напишите программу, которая по заданному N (в этой задаче 1 <= N <= 100)
и вещественным числам a, b, p, q (a > 0, b > 0) находит вещественный массив
X = (x[0], x[1], ..x[N]), в котором каждый последующий элемент получается
из двух предыдущих следующим образом:
p*x[j-1] + q*x[j-2]
x = ---------------------
p + q
где x[0] = a, x[1] = b и j = 2, 3, ..N.
Затем требуется в массиве X наибольший и наименьший элементы заменить на
среднее арифметическое.
Исходные данные
Числа N, a, b, p, q.
Выходные данные
Массив X до и после преобразования.
№ 146 | Автор: jodgick |
2013-10-08, 17:26 | Изменено: jodgick - Вт, 2013-10-08, 17:32
|
Репутация: [ + 0 ]
|
|
|
|
|
Найти сумму элементов массива, которые делятся на заданное число
|
|
|
|
const
n=10;
var
a:array[1..n]of integer;
sum,i,val:integer;
begin
sum:=0;
read(val);
for i:=1 to n do begin
read(a);
if a mod val = 0 then sum:=sum+a;end;
writeln(sum);
end.
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
|
|
Написать программу для вывода на экран всех четных чисел от 1 до 20 включительно.
|
|
|
|
var
i:byte;
begin
for i:=1 to 20 do
if i mod 2 = 0 then write(i,' ');
end.
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
|
|
Дан массив X(N,M).Найти номера столбцов массива,все элементы которых четны. Из полученных значений сформировать одномерный массив.
|
|
|
|
составьте программу нахождения среднего арифметического значения одномерного массива А(Е).(элементы массива вводятся с клавиатуры). сформируйте новый массив B(m) состоящий из элементов массива А(Е) меньших среднего арифметического. в массиве B(m) определите минимум.
123
|
|
|
|
|
Составьте программу вычисления суммыэлементов встречающихся только в одном из массивов A(N) или B(N).
|
|
|
|
|
Помогите пожалуйста написать программу на Паскале: Элементы массива A(N) удовлетворяют условию A(1)<A(2)<A(3)<...<A(N).Выбрать элемент массива ,ближайший к произвольному значению X,где A(1)<=X<=A(N).
|
|
|
|
якої розмірності масиви ?
Verhovny Menko
|
|
|
|
var mas: array [0..10] of integer;
i:integer;
begin
for i:=0 to 10 do
begin mas :=i*2;
write(mas, ' ');
end;
writeln();
i:=0;
while(i<10) do
begin
mas [i+1]:=mas+mas[i+2];
i:=i+2;
end;
for i:=0 to 10 do
write (mas, ' ');
end.
Помогите пожалуйста восстановить условие задачи
|
|
|
|
Цитата Alena060463 (  ) составьте программу нахождения среднего арифметического значения одномерного массива А(Е).(элементы массива вводятся с клавиатуры). сформируйте новый массив B(m) состоящий из элементов массива А(Е) меньших среднего арифметического. в массиве B(m) определите минимум.№152 | Автор: Alena060463 | 2014-06-08, 11:23 | Репутация: [ + 0 ]
var
i, sum, min: integer;
B, A: array [1..10] of integer;
srd: real;
begin
writeln('Введите элементы массива rageo');
sum := 0;
for i := 1 to 10 do
begin
read(A);
sum := sum + A;
end;
srd := round(sum / 10);
min := 32000;
for i := 1 to 10 do
if A < srd then
begin
B := A;
if B < min then min := B;
end;
writeln(A);
writeln('среднее ', srd);
writeln(B);
writeln('минимум ', min);
end.
GeRa
|
|
|
|
