Составить программу, проверяющую, является ли последовательность из N целых чисел, , вводимых с клавиатуры, убывающей.
бэлла31
1
24.04.2020 09:47
2
Другие вопросы по теме Информатика
EvaSwansea12
26.02.2020 13:19
fedoseeva3335
26.02.2020 13:18
айсу17
23.05.2019 23:20
malina78911
23.05.2019 23:20
stylestudionmovp557
23.05.2019 23:20
Регина2411
02.12.2020 14:33
nikj12320
02.12.2020 14:33
dfgdfh2
02.12.2020 14:33
ulianalypka
02.12.2020 14:33
Популярные вопросы
- Что такое профиль разреза...
2 - какие пейзажи возникают в вашем воображении под впечатлением от этой музыки Мусорский...
2 - Есімізге түсірейік! Киіктің төлі қалай аталады? Киіктің аналығы қалай аталады?...
1 - Письменное деление двузначного числа на однозначное без переходачерез разряд.Заполни...
2 - Плавающий на воде брусок имеет объем 0,28 м3. Определите выталкивающую силу,...
1 - Сколько лет длился поход Чжан Цяня...
1 - Сравните македонское и сакское войско. Найдите по два отличия и один общий признак...
1 - Какие ядерные реакции происходят только при очень высокой температуре...
2 - чорна маса рогатоїі худоби домінує над рудою а біло головість над суцільним забарвленням...
2 - strange traditional shocking dullridiculous amusing colourful originalprovocative1...
3
var
a1,b2,c,d:integer;
begin
write('Введите числа через пробел: ');
read(a1);
for d:=2 to 10 do begin
read(b2);
if b2>a1 then inc(c);
a1:=b2;
end;
if c=9 then writeln('Да') else writeln('Нет');
end.