Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 22.03.2011
Сообщений: 7
1

Вывести номер последнего числа в наборе

22.03.2011, 22:31. Показов 1365. Ответов 1
Метки нет (Все метки)

дано целое число "К" и наоборот ненулевых целых чисел: Признак его завершения - числа 0.Вывести номер последнего числа в наборе,большего"К".Если такич чисел нет,то вывести 0.



помогите! а то отчислят!
 Комментарий модератора 
Новый вопрос - новая тема!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.03.2011, 22:31
Ответы с готовыми решениями:

Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента, равного 2
Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого...

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

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

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

1
Модератор
63391 / 47080 / 32450
Регистрация: 18.05.2008
Сообщений: 114,120
23.03.2011, 09:07 2
Лучший ответ Сообщение было отмечено kazhim как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
var k,a,n,i:integer;
begin
write('K=');
readln(k);
writeln('Введите набор целых чисел, окончание ввода 0');
n:=0;i:=0;
repeat
read(a);
i:=i+1;
if a>k then n:=i;
until a=0;
write('Номер последнего числа, больше ',k,'=',n);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.03.2011, 09:07

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Вывести номер последнего числа в наборе, большего K
Series16°. Дано целое число K и набор ненулевых целых чисел; признак его за-вершения — число 0....

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

Вывести номер последнего числа в наборе, большего К
Написать программу обработки одномерного массива. При решении задачи использовать операторы...

Дано целое число K и набор ненулевых целых чисел.Вывести номер первого числа в наборе, большего K. Если таких чисел в наборе нет, то вывести 0
Реализовать данные задания с помощью циклов с предусловием или циклов с постусловием. Во всех...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.