Показать сообщение отдельно

  #788  
Старый 22.11.2008, 19:52
GOODmen
Участник форума
Регистрация: 08.11.2008
Сообщений: 164
Провел на форуме:
5779069

Репутация: 185
По умолчанию

Народ выручайте,нужно лабу сделать на free pascale кто поможет тому огромный респект
Вот задачи
Цитата:
1)сколько чисел натурального ряда,начиная с А,нужно взять,чтобы сумма нечетных из них не превосходила число ,заданное с клавиатуры.Число Ф задать случайно из диапазона от 1 до 10.

2)Найти сумму всех элементов массива целых чисел,которые меньше средьнего арифмитического элементов массива.Размерность массива 20.Заполнение масива осуществить случайными числами от 150 до 300.
3)Натуральное число из Н цифр являеться числом Амстронга,если сумма его цифр,возведенная в Н степень равна этому числу.Найти все числа Амстронга среди четырехзначных чисел.
4)Дан массив размера 10.Обнулить элементы массыива,расположенные между его минимальным и максимальными элементами(не включая мин. и макс. элементы)
 
Ответить с цитированием