tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Другие предметы
Какой газ преобладает
Какой газ преобладает в составе атмосферы?
ПотнаяБабка2000
3 17.04.2019 07:20
3
Ответы
danilkudo423
07.06.2020 08:04
Program gt;
var a:array[1..100]of integer;
n,i,B,j:integer;
begin
readln(n)
for i:=1 to n do
read(a[i]);
j:=0;
for i:=1 to n do
if(a[i]<=b)then begin
j:=i;
break;
end;
if(j>0)then writeln(j) else writeln(n+1);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы
irina0208ga
14.10.2021 09:09
Абайдың көксеген қандай арманы қандай еді?...
Fire4ik1
21.08.2021 13:48
Ищу подругу, которая буквально всегда онлайн. не волнуйтесь, я девочка , не удаляйте...
жалеоИвантелтуштуш
21.08.2021 13:16
Разделите фигуры, изображенные на рисунке, на две равные части. Разрезать можно не только по линиям клеток, но и по их диагоналям...
zaika25901
24.01.2021 21:25
РЕШИТЬ НОМЕРА 4.106(7,8,9) ...
roapoaop
24.01.2021 21:25
Сочинение на тему изображение: гражданская война как трагедия народа...
Fhaj1
24.01.2021 21:25
TikFans Check out the TikFans app!https://tikfansapp.page.link/i9iJsDn4vkYijE7o9...
777alisham
24.01.2021 21:25
Как ты думаешь, каким будет звук часов, изображенных на рисунках? Нарисуй преграду для звука. Что будет происходить со звуком? Изобрази с стрелок. Сделай описание этого...
Vlad010934
24.01.2021 21:25
что у него в рту было иза чего вырвали , что за просфора...
rfudedw08
24.01.2021 21:25
ть будь-ласка кров зноса як нада...
майнкрафтерчитак
24.01.2021 21:25
Змішали NaHCO3 масою 5г та C2H4О2 масою 30г. Яка маса вуглекислого газу виділиться., якщо натрій ацетату утворилось при цьому 12 г?...
Популярные вопросы
АЙТЫЛЫМапсырма. Дүкенбай Досжанның «Жібек жолы» романы бойын-ша түсірілген...
2
Ағылшын тілінде диалог құрау бағдарламалар мен фильмдер туралы ...
3
ПОЖАЙЛУСТА надо составить сказку про сложение рациональных чисел...
2
Use the verbs in the correct form to complete the sentences. 1) Nancy...
2
1) какие во решало Народное собрание в Афинах? 2) как голосовали...
1
При комнатной температуре и атмосферном давлении практически мгновенно...
3
Дұрыс! Бұрыс-2-тапсырма. Мәтіндегі ақпараттың дұрыстығын тексер.1...
3
Решите даже где есть варианты ответов...
3
. Теңдеулерді шеш63 : х = 159 – 150мя коi пira...
2
решите наибольшие наименьшее зачения функции...
2
var a:array[1..100]of integer;
n,i,B,j:integer;
begin
readln(n)
for i:=1 to n do
read(a[i]);
j:=0;
for i:=1 to n do
if(a[i]<=b)then begin
j:=i;
break;
end;
if(j>0)then writeln(j) else writeln(n+1);
end.