Определить, содержит ли массив a[1..20] из диапазона (-20, 60) случайных чисел число х. на языке паскаль
186
389
Ответы на вопрос:
Pascalabc.net 3.4.0, сборка 1670 от 23.05.2018 внимание! если программа не работает, обновите версию! begin var a: =arrrandom(20,-20,60); a.println; var x: =readinteger('какое число ищем? '); if a.contains(x) then writeln('такое число есть') else writeln('такого числа нет') end. примеры 42 23 59 0 20 23 41 26 47 8 23 42 20 35 31 53 -4 53 8 14 какое число ищем? 25 такого числа нет 15 1 44 40 55 3 31 -12 29 33 4 -13 -12 43 -14 51 44 -2 41 18 какое число ищем? -12 такое число есть
Program diapozon; var a: array [1..20] of integer; x: integer; i: shortint; begin randomize; for i: = 1 to 20 do a[i]: = random(-20,60); write('введите число, которое нужно проверить > > '); readln(x); for i: = 1 to 20 do if(a[i] = x) then begin writeln('это число есть в массиве'); exit; end; writeln('этого числа нет в массиве'); end. //программа создаст массив из 20 элементов с числами от -20 до 60 и проверит есть ли в нем число, заданное пользователем. выведет пояснение.
var a,b,c,s: integer;
begin
readln(a,b,c);
s: =0;
if (a> 0) then s: =s+a;
if (b> 0) then s: =s+b;
if (c> 0) then s: =s+c;
writeln(s);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
jelyrotos20.08.2020 04:07
-
EGORchikchik22829.07.2020 08:10
-
Aleksa4nick22.11.2022 14:32
-
SaBzZiRo31.12.2022 10:13
-
RasDua01.09.2021 13:55
-
Milana00000011114.03.2021 13:07
-
Terhiop28.06.2020 23:13
-
dfghfgjkhfdjkgh03.09.2022 23:10
-
viktorvr7424.11.2020 18:58
-
ElenaFevralV03.08.2020 00:05
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.