0 / 0 / 1
Регистрация: 22.04.2010
Сообщений: 10
1

Series 20: Вывести те элементы в наборе, которые меньше своего правого соседа

22.04.2010, 22:01. Показов 1236. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте люди добрые, Вот и у меня настала практика по Pascal, 44 задачи я решил из 54, на остальные ума не хватает, прошу вашей помощи, всем кто откликнется Большое спасибо!
Задача 20:
Дано целое число N (>1) и набор из N целых чисел. Вывести те элементы в наборе, которые меньше своего правого соседа, и количество K таких элементов.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.04.2010, 22:01
Ответы с готовыми решениями:

Вывести те элементы в наборе, которые меньше своего правого соседа, и количество К таких элементов
№1. дан набор ненулевых целых чисел; признак его завершения - число 0. вывести количество чисел в...

Вывести те элементы в наборе, которые меньше своего левого соседа, и их количество
одномерный массив дано целое число N (>1) и набор из N целых чисел. Вывести те элементы в наборе,...

Вывести номера тех чисел в наборе, которые меньше своего левого соседа
Дано целое число N и набор из N целых чисел. Вывести номера тех чисел в наборе, которые меньше...

Вывести те элементы в наборе, которые меньше своего правого соседа
2. Дано целое число N(>1) и набор из N целых чисел. Вывести те элементы в наборе, которые меньше...

1
4342 / 1474 / 680
Регистрация: 12.03.2009
Сообщений: 5,310
22.04.2010, 22:08 2
Лучший ответ Сообщение было отмечено $Major$ как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses crt;
var k,i,a,b,n:integer;
begin
    k:=0;
    clrscr;
    write('N -> ');
    readln(n);
    write('-> ');
    read(a);
    for i:=1 to n do
    begin
     read(b);
     if a<b then
     begin
      write(a,' ');
      inc(k);
     end;
     a := b;
    end;
    writeln(k);
    readln;
end.
0
22.04.2010, 22:08
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.04.2010, 22:08
Помогаю со студенческими работами здесь

Вывести те элементы в наборе, которые меньше своего левого соседа
Помогите решит вот эти 2 задачи : 2)Дано целое число N (&gt;1) и набор N целых чисел. Вывести те...

Вывести номера тех чисел в наборе, которые больше своего правого соседа
Может кто знает как сделать эти задачи если да то напишите плс! 1. Дано целое число N (&gt; 0). Если...

Вывести номера тех чисел в наборе, которые больше своего правого соседа
Задание. Составить блок-схему алгоритма и написать программу обработки одномерного массива, как...

Вывести номера тех чисел в наборе, которые больше своего правого соседа, и количество таких чисел
Дано целое число N и набор из N целых чисел. Вывести номера тех чисел в наборе, которые больше...

Вывести номера тех чисел в наборе, которые больше своего правого соседа, и количество K таких чисел
Дано целое число N и набор из N целых чисел. Вывести номера тех чисел в наборе, которые больше...

Вывести номера тех чисел в наборе, которые больше своего правого соседа, и количество K таких чисел
Дано целое число N и набор из N целых чисел. Вывести номера тех чисел в наборе, которые больше...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru