Дан массив целых чисел из 25 элементов, заполненный случайным образом числами из промежутка от -60 до 90. вывести на экран все элементы, первая цифра которых совпадет с заданной.
251
418
Ответы на вопрос:
program massive;
uses crt, math;
var
mas: array [1..25] of integer;
d,x: integer;
z: byte;
begin
randomize();
repeat
writeln('введите одну полижительную цифру от 1 до 9: ');
readln(x);
until x> =0 and x< =9;
z: =1;
//проверка на совпадения
while z< =25 do
begin
mas[z]: =random(-60,90);
d: =mas[z] div 10;
if abs(d)=x or abs(mas[z])=x then
write('совпадения: ', mas[z],' ');
z: =z+1
end;
writeln('конец проверки');
readln
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
HydRarGyrUm7429.12.2022 23:39
-
kilu55802817.01.2021 19:02
-
bintcliffe18.04.2021 16:39
-
Vladimirhdjdn13.10.2022 15:09
-
Dan36319.02.2021 18:20
-
alexandrafortun07.11.2022 14:06
-
Tana136917.05.2021 06:28
-
AzalieySagaz19.07.2020 03:46
-
КАНЯ111111111106.09.2022 17:52
-
zarugeos31.01.2020 01:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.