Напишите программу, которая выделяет в другой массив все элементы исходного массива, которые записываются трёхзначными числами в десятичной системе, делятся на K и не делятся на M . Входные данные
Первая строка содержит размер массива N . Во второй строке через пробел задаются N чисел – элементы массива. Гарантируется, что 0 < N ≤ 10000 . В третьей строке через пробел записаны два числа – K ( 1 < K ≤ N ) и M ( 1 ≤ M ≤ N ).
Выходные данные
Программа должна вывести в одну строчку все элементы построенного массива, разделив их пробелами. Если ни одного подходящего элемента в массиве не было, программа должна вывести число 0.
НА С++
mishac1470
2
28.11.2020 16:07
40
Другие вопросы по теме Информатика
Maks2222222222
21.04.2020 16:36
spaisminGena
21.04.2020 16:36
dedovu6
21.04.2020 16:37
tagirrulit
03.05.2021 13:26
malia20092004
19.05.2019 17:30
Yanuska224
19.05.2019 17:30
angel020580
19.05.2019 17:40
ксюш4
19.05.2019 17:40
сорин8888
19.05.2019 17:40
Популярные вопросы
- Разложите многочлен на множители- 1. 0,04a^2 - 0,25b4= 2. 3x^2 - 18x + 27= 3. 4ac^3...
2 - На малый поршень гидравлической машины производят давление 600кпа. с какой силой...
3 - Употребите глаголы в настоящем времени. 1).1. я(звонить)брату. 2.али (изучать)...
1 - Разбор имени прилагательного круглые...
2 - Запиши словосочетание свежий воздух в родительном падеже выдели окончание прилагательного...
3 - 1.в каком слове ударение падает на первый слог: а) иконопись; б) искристый; в)...
2 - Воздушные массы на полуострове аляска! ?...
3 - Минус семь девятых плюс пять шестых= (-7/9+5/6=)...
1 - Спишите раскрывая скобки.по (стороны)улицы тянулись заборчики сплетённые из ивовых(прутья).за...
1 - Какое слово из букв с ь е к о т з а...
2
Объяснение:
Pascal
program pr;
var
i, n, k, cout: integer;
a, b: array [1..100] of integer;
begin
cout := 0;
k := 1;
writeln('Введите размер массива');
readln(n);
if (n>0) and (n<=10000) then
begin
for i := 1 to n do
begin
read(a[i]);
end;
writeln;
for i := 1 to n do
if a[i] < 0 then
begin
cout := cout + 1;
b[k] := a[i];
k := k + 1;
end;
if cout = 0 then
writeln(0) else
for k := 1 to cout do
write(b[k]:3);
end
else writeln('Не корректный ввод n');
end.