сервис вопросов и ответовШкольный уровень 1.Найти все элементы массива b(n),большие или равные 0.На экран вывести номер элементо
5-9 класс|
|
в,их значения и количество.
2.В одномерном массиве целых чисел,содержащем 20 элементов,удалить k-ый элемент массива.Массив заполняется случайным образом числами от 0 до 50.
Рувият89
23 апр. 2014 г., 13:07:10 (10 лет назад)
Maria7711
23 апр. 2014 г., 14:39:25 (10 лет назад)
var
b:array[1..100] of integer;
i, count, n:integer;
begin
randomize;
write('n = '); readln(n);
for i := 1 to n do
begin
b[i] := random(51) - 25;
writeln('b[', i, '] = ', b[i]);
end;
writeln;
count := 0;
for i := 1 to n do
if b[i] >= 0 then
begin
writeln('b[', i, '] = ', b[i], ' >= 0');
inc(count);
end;
writeln('Count = ', count);
end.
// вторая программа
const
n = 20;
var
a:array[1..n] of integer;
i, k:integer;
begin
randomize;
writeln('Исходный массив: ');
for i := 1 to n do
begin
a[i] := random(51);
write(a[i], ' ');
end;
writeln;
write('k = '); readln(k);
if (k > n) or (k < 1) then
begin
writeln('элемента с таким индексом нет');
readln;
Exit;
end;
for i := k to n - 1 do
a[i] := a[i + 1];
a[n] := 0;
writeln('Измененный массив:');
for i := 1 to n - 1 do
write(a[i], ' ');
readln;
writeln;
end.
Ответить
Другие вопросы из категории
Напишите программу, которая находит произведение двух наибольших чисел из последовательности натуральных чисел. Программа получает на вход натуральные
числа, количество чисел неизвестно (но не менее двух), ввод последовательности заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Значения чисел не превышают 30000. Программа должна вывести одно число: произведение двух чисел, значения которых в данной последовательности наибольшие
Читайте также
1) составьте программу заполнения элементов массива [1..10 ] случайнымии целыми числами на отрезке [ 0;35 ] и вывода на экран нечетных элементов и
кратных числу 3.
2) составьте программу , которая заполняет массив а[1..10 ] случайными целыми числами в диапозоне от 1 до 100 и выводит на экран среднее арифмитическое элементов массива
1. Массив и 4 целых чисел вводится с клавиатуры. Найти и вывести произведение элементов массива.
2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.
1.Вставьте пропущенные слова в описании массива А, элементами которого являются целые числа. А: _________________[1..100] of ______________.
2. Опишите массив для хранения зарплаты за каждый месяц. Зарплату считать целым числом.
3.Опишите: a)Переменную В для массива, состоящую из 8 символов. b)Переменную MAS для массива, состоящего из 100 вещественных чисел. c)Переменную DAY для массива, состоящего из 30 целых чисел, причем номер первого элемента массива должен быть равен 5
.4. Пусть А : array [1..10] of integer. Напишите операторы, соответствующие следующим действиям: a. Третий элемент массива сделать равным 5. b. Вывести на экран 7-й элемент массива. c. Ввести значение 1-го элемента массива. d. Вычислить сумму 1,2 и 3-го элементов массива.
5. Пусть А : array [1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Вычислить сумму всех элементов массива (используйте цикл).
6. Пусть C : array [1..10] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Вывести на экран все элементы массива.
7. Пусть А : array [1..15] of real. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Поменять местами первый и последний элементы массива.
8. Пусть В : array [1..20] of integer. Напишите операторы, соответствующие следующим действиям, при необходимости используя дополнительные переменные: Заполнить массив случайными числами из интервала [-24;37].
Вы находитесь на странице вопроса "Школьный уровень 1.Найти все элементы массива b(n),большие или равные 0.На экран вывести номер элементо", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.