Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
kalanda
0 / 0 / 1
Регистрация: 06.02.2018
Сообщений: 213
1

Вывести только двузначные элементы массива, сохранив их относительное местоположение в исходном массиве

10.02.2018, 00:03. Просмотров 909. Ответов 4
Метки нет (Все метки)

задан массив со случайными значениями вывести ,Только двузначные элементы массива, сохранив их относительное местоположение в исходном массиве , если можно в процедуре пожалуйста ,незнаю как код записать , если лень напишите пожалуйста только ту строку когда код программы сохраняет относительное местоположение в исходном массиве
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.02.2018, 00:03
Ответы с готовыми решениями:

Выбрать только двузначные элементы массива, сохранив их относительное положение в исходном массиве
написать програму . сам не понимаю если кто разбирается напишите код пожалуйста...

Вывести те элементы, которые стоят на каждом пятом месте в исходном массиве.
Сформировать целочисленный массив на отрезке , содержащий 40 элементов....

Вывести элементы, которые есть только в массиве А или только в массиве В
Помогите пожалуйста! Вывести элементы, которые есть только в массиве А или...

Дан одномерный массив целых чисел. Вывести на экран все двузначные элементы этого массива.
Ребята, помогите пожалуйста! Дан одномерный массив целых чисел. Вывести на...

Отсортировать в массиве только двузначные числа , а однозначные оставить на своих местах
1)отсортировать в массиве только двузначные числа , а однозначные оставить на...

4
Hitoku
Модератор
1703 / 1302 / 1400
Регистрация: 28.10.2016
Сообщений: 4,240
Завершенные тесты: 4
10.02.2018, 01:31 2
Лучший ответ Сообщение было отмечено kalanda как решение

Решение

Pascal
1
2
3
4
begin
  var a := ArrRandom(20, 0, 200); a.Println;
  a.Where(v -> (v > 9) and (v < 100)).Println;
end.
1
kalanda
0 / 0 / 1
Регистрация: 06.02.2018
Сообщений: 213
10.02.2018, 08:18  [ТС] 3
спасибо огромное

Добавлено через 9 минут
не подскажите куда это вставить и как в процедуру ввода массива или вывода? или в процедуру сортировки? принт я так понял это вывод?и паскаль ругается на a.where и a,println


Pascal
1
2
3
4
5
6
7
8
9
procedure printMas(na: byte;  a:massiv);           
var 
  i:byte;
    begin
    for i := 1 to na do 
 
    write(a[i]:3);
    writeln;
    end;
0
Puporev
Модератор
54584 / 42090 / 29061
Регистрация: 18.05.2008
Сообщений: 99,277
10.02.2018, 10:19 4
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Цитата Сообщение от kalanda Посмотреть сообщение
паскаль ругается на a.where и a,println
Или у Вас не АВС.net, или очень уж старя версия, обновите.
Если нужно в стиле простого АВС, то так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
type mas=array of integer;
procedure massiv(var a:mas;var n:integer);
begin
write('Введите размер массива n=');
readln(n);
setlength(a,n);
writeln('Массив');
randomize;
for var i:=0 to n-1 do
 begin
  a[i]:=random(1000);
  write(a[i]:4);
 end;
writeln;
end;
procedure print_2z(a:mas;n:integer);
begin
writeln('Двузначные числа в порядке следования');
var k:=0;
for var i:=0 to n-1 do
if a[i] in [10..99] then
 begin
  write(a[i]:4);
  k:=1;
 end;
if k=0 then write('Двузначных чисел нет') 
end;
var a:mas;
    n:integer;
begin
massiv(a,n); 
print_2z(a,n);
end.
1
kalanda
0 / 0 / 1
Регистрация: 06.02.2018
Сообщений: 213
10.02.2018, 16:43  [ТС] 5
спасибо большое
0
10.02.2018, 16:43
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.02.2018, 16:43

Программа по нахождению четных чисел в массиве, заданном случайным образом (только двузначные числа)
Procedure. Написать программу, которая находит в заданном случайным образом...

Перебрать все двузначные числа и вывести на экран только те...
в записи которых цифры отличны, вывести их количество.

Из массива A [7]: 4143190 удалить нечетные элементы, встречающиеся в массиве только один раз
Из массива A : 4143190 удалить нечетные элементы, встречающиеся в массиве...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru