1)Вводить числа с клавиатуры, конец ввода- 999. Посчитать средне-арифметическое из положительных нечетных чисел. Такие числа и результат выдать на экран.


2)Составить программу, определяющую минимальное из всех введенных чисел с клавиатуры. Признак конца ввода- число 0. Организовать цикл. при вводе 999- выход из программы


Добавлено через 1 мин.
плииииз

readln(chislo);

if (chislo>0 ) and (odd(chislo)) then ...

сумма чисел / на количество чисел



Призрак сапог армейских завеял?

что то вообще не понятно а поподробнее можно ?

Можно.

Алгоритм нижеследующий:

сумма чисел:=0;
количество чисел:=0;
Повторять 
  ввести число;
  если число> 0 и число - нечетное то
    начало
      вывести число;
      сумма чисел:=сумма чисел+число:
      количество чисел:=количество чисел+1;
    конец
до тех пор пока число=666;     
среднее:=сумма чисел / количество чисел;
вывести   среднее;

Вам нужно записать его по правилам языка Паскаль.

благодарен

Классика. Завтра он придет и назовет тему "помогите задачу решить!" Фантазер ты наш ненаглядненький! Выдумщик..

!

Правила Форума, п.4. Правила раздела Задачи, п.1. Тема переименована и закрыта.