Дано целое число N – количество элементов массива. Вывести те цифры элементов ма...

October 2021 1 9 Report

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

Answers & Comments

PatifonKakao 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 Можешь показать решение этой задачи с помощью множеств?

PatifonKakao Да

spiridonovnout http://znanija.com/task/15364928

spiridonovnout http://znanija.com/task/15364900

Answers & Comments

podstroka var temp strsplitwherei gt icontainspodstr consolewrit

dana stroka podschitat samuyu dlinnuyu posledovatelnost podryad idushih bukv apr

visual basicnapishite programmuvychislyayushuyu po izvestnym znacheniyam domauskoreni

sortirovka elementov pervogo stolbca s pomoshyu pryamogo obmenaprogramma paskal

sortirovka polozhitelnyh elementov metodom pryamogo vybora programmapaskal

izobrazit na ekrane evm sleduyushij risunok postroenie graficheskih izobrazhenij v

1absxy writelnzz end kakuyu podprogrammy proceduru mozhno sdelat

dlya uchastiya v studencheskih sportivnyh sorevnovaniyah vydeleno iz pervoj gruppy 5

dana posledovatelnost celyh chisel zamechanie zadachi iz dannogo punkta reshit

perepishite programmu pod pascal using system namespace consoleapplication cla

рекомендуемые вопросы

Helpful Links

Helpful Social