Вопрос по информатике:
Дано целое число N – количество элементов массива. Вывести те цифры элементов массива, которые содержатся хотя бы в одном из разрядов сотен.Если таких цифр нет, выведите сообщение "Таких цифр нет".Паскаль abc
- 21.11.2017 03:07
- Информатика
- remove_red_eye 5117
- thumb_up 45
Ответы и объяснения 1
Var
A:array of integer; // Динамический массив
n,i:integer;
flag:boolean;
begin
readln(n);
SetLength(A,n); // Выделение памяти
randomize;
for i:=0 to n-1 do
A[i]:=random(1000);
flag:=false;
for i:=0 to n-1 do
if (A[i] div 100)>0 then
begin
write (A[i]:4);
flag:=true;
end;
if not(flag) then writeln('Таких цифр нет');
end.
- 22.11.2017 10:28
- thumb_up 51
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.