Консультация № 138022
27.05.2008, 10:40
0.00 руб.
0 1 1
Добрый день.Помогите,пожалуйста,решить следующую задачу..Заранее очень благодарен.
Дана непустая последовательность натуральных чисел, за которой следует 0. Написать программу определения порядкового номера наименьшего из них.

Обсуждение

давно
Старший Модератор
31795
6196
27.05.2008, 11:29
общий
это ответ
Здравствуйте, Хорост Андрей Викторович!

Программа в приложении.

Материал из Википедии :
Существуют два подхода к определению натуральных чисел — числа, используемые при :
<b>перечислении (нумеровании) предметов</b> (первый, второй, третий…) — подход, общепринятый в большинстве стран мира (в том числе и в России).
<b>обозначении количества предметов</b> (нет предметов, один предмет, два предмета…).
В программа работает по первому варианту.
Удачи!

Приложение:
var w,x,y,z:word; begin z:=0; repeat{в цикле вводим числа} write(‘Enter number:‘); readln(x); inc(z); {проверяем услововие} if ((z=1)or(x<y))and(x>0) then begin y:=x; w:=z; end; until x=0; writeln(y:7,w:8); end.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

Форма ответа