Дана последовательность из n целых чисел. определить, есть ли в ней число, равное первому из этой последовательности.
156
479
Ответы на вопрос:
Var i,k,n,a1: integer; begin readln(n); readln(a1); for i: =0 to n-1 do begin readln(k); if (a1 = k) then writeln("есть такое число") else writeln("нет такого числа"); end; end.
Var x,f,s,c,a,b: real; begin write('x = '); readln(x); write('a = '); readln(a); write('b = '); readln(b); f: =x*x-3; s: =a*b/2; c: =a*a-b*b; writeln('f=',f: 3: 2,' s=',s: 3: 2,' c=',c: 3: 2); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
BugaevaAina10.06.2021 16:45
-
ThreeCats05.07.2021 14:10
-
kkseniyakach08.03.2023 18:42
-
Matvey020308.07.2022 23:36
-
sunriseliva21.01.2023 20:14
-
СлюсаревИван27.11.2020 20:04
-
negricho07.09.2021 08:30
-
liana20067128.01.2021 20:37
-
вика387504.05.2020 16:44
-
Varya111111111111319.05.2021 19:13
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.