Предмет: Информатика, автор: spiridonovnout

Дано целое число N – количество элементов массива. Вывести те цифры элементов массива, которые содержатся хотя бы в одном из разрядов сотен.Если таких цифр нет, выведите сообщение "Таких цифр нет".Паскаль abc

Ответы

Автор ответа: PatifonKakao
0
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.
Автор ответа: spiridonovnout
0
Можешь показать решение этой задачи с помощью множеств?
Автор ответа: PatifonKakao
0
Да
Автор ответа: spiridonovnout
0
http://znanija.com/task/15364928
Автор ответа: spiridonovnout
0
http://znanija.com/task/15364900
Похожие вопросы
Предмет: Математика, автор: VeraSh123