Помощь - Поиск - Пользователи - Календарь
Полная версия: Помогите решить задачки
Форум «Всё о Паскале» > Современный Паскаль и другие языки > Делфи
All
Помогите решить задачки,готовлюсь к экзамену и понимаю то,что ничего не понимаю)
Буду очень благодарен,если уж не за решение,так хоть на ссылку на хороший ресурс...но лучше уж за решение)

1) Структура проекта.
Найти среднее арифметическое значение чётных чисел в промежутке от M до N. Ввод чисел M и N. Вывести M,N и среднее арифметическое число.

2) Элементы программ.
Составить программу для вычисления n! . Ввод n с клавиатуры.

3) Целые типы данных.
Составить программу для подсчёта количества чисел из последовательности 0,3,6,9,12....,чтобы сумма их была >500. Вывести сумму,колличество и последнее число.

4) Тип дата-время.
Составить программу для вычисления суммы,разности,произведения и частного двух чисел. Ввод двух чисел в объект Edit, одновременный вывод суммы,разности,произведения и частного в объект Memo.

5) Простые порядковые типы.
Ввод произвольных символов в строку,организовать вывод в другой объект только те символы,номер которых чётное число.
Better Kind
1. число проверяется на нечетность функцией ODD : boolean;

2 .факториал:
Код
  f:=1;
    for i:=1 to 5 do
    f:=f*i;


3. Каким образом последовательность задана? Если массив, тогда:
Код
While Sum<500 do
sum:=sum+a[i];
inc(i);


4. Уточняй задачу? Толи время, толи числа?

5. Считываем в массив, и аналогично п.1. проверяем четность.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.