Помощь - Поиск - Пользователи - Календарь
Полная версия: Ничего сложного...
Форум «Всё о Паскале» > Pascal, Object Pascal > Теоретические вопросы
Андрей
Ребята, здравствуйте!
Если кому не сложно набрасайте алгоритм задачи: Из предложенного промежутка чисел выбрать все отрицательные. Например, вводим -5, затем 54 ответ: -5, -4, -3, -2,-1.
Помогоите пожалуйста. Спасибо за внимание.
APAL
Например так:

1. Проверяем что нижний предел меньше нуля и верхнего предела
2. Организуем цикл от нижнего предела до верхнего предела с проверкой и выводом результата.

Код

Procedure Show(min,max : Integer);
var i : integer;
Begin
If (min<0) and (min<max) then
 For i:=min to max do
   if i<0 then Writeln(i);
End;
AlaRic
Модератор, внимательнее!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.