сервис вопросов и ответовВвести массив из 30 случайных чисел промежутка [50..99], подсчитать число элементов, состоящих из 2-ух одинаковых чисел.
10-11 класс|
|
Помогите, пожалуйста.
Gubertmarina20
01 апр. 2016 г., 6:03:25 (8 лет назад)
Gorchakov77
01 апр. 2016 г., 8:23:50 (8 лет назад)
Program n1;
Uses Crt;
var a: array[1..30] of integer;
k,m,i,j,n: integer;
begin
for i:=1 to 30 do
begin
a[i]:=random(50)+50;
write(a[i],' ');
end;
writeln; writeln('---');
k:=0; n:=1;
for i:=1 to 30 do begin
n:=0; m:=a[i];
for j:=1 to 30 do begin
if (m=a[j]) and (i<>j) and (n<2) then begin
k:=k+1; n:=n+1;
end;
end;
end;
writeln('Kol-vo chisel - ', k/2);
end.
Вроде бы сделал так, как требовалось.
ПлохаяДевчонка
01 апр. 2016 г., 11:15:52 (8 лет назад)
состоящих из 2-ух одинаковых ЦИФР. Слово перепутала ))
Елена9816
01 апр. 2016 г., 13:23:15 (8 лет назад)
массив обязательно руками вводить? или можно random?
Ответить
Другие вопросы из категории
помогите пожалуйстааа решить задачу. очень нужнооооо массив a [i] = 15- 4i подсчитать количество отрицательных членов и
выдать их номера?
решаем как то так как во вложении. помогитееее
Допустимы ли присваивания:
1) k:=5;
2) k:=10;
3) k:=-0;
4) k:='5';
5) k:=ord(d);
6) k:=ord(d)-ord('0');
Если k: 0 .. 9;
Дано 50 целых чисел, посчитать произведение отрицательных, сумму положительных и кол-во равных нулю чисел.
Срочно нужно решение задачи
Сформировать и вывести таблицу умножения в 16-ричной системе счисления. Вывод осуществить в виде таблицы, на пересечении i-ой строки и j-ого столбца,
которой располагается результат перемножения 16-ричных цифр "i" и "j". (QBasic)
Читайте также
ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из
языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.
Написать программу, которая генерирует и выводит на экран массив из 10 случайных чисел в диапазоне от -100 до 100, меняет местами первую и вторую
половину массива и выводит новый массив на экран.
дан массив из семи элементов написать программу подсчитывающую
среднее второго и предпоследнего элементов массива
дан целочисленный
массив из 10 элементов написать программу находящую сумму элементов
массива красных 3 ил 5
дан целочисленный массив из 30 ти элементов
написать программу которая позволяет найти среднее арифметическое
положительных элементов массива
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
Вы находитесь на странице вопроса "Ввести массив из 30 случайных чисел промежутка [50..99], подсчитать число элементов, состоящих из 2-ух одинаковых чисел.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.