Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 18.05.2011, 14:15
2Ric 2Ric вне форума
Прохожий
 
Регистрация: 18.05.2011
Сообщения: 1
Репутация: 10
По умолчанию Пожалуйста помогите написать программы!

Тема: Цикл с параметром.
1.Написать программу, которая выводит на экран таблицу
стоимости, например, яблок в диапазоне от 100 г до 1 кг с шагом 100.
2.Написать программу, которая выводит двоичное представление введенного с клавиатуры десятичного целого числа в диапазоне от 0 до 255.
3.Написать программу, которая вводит с клавиатуры 5 дробных чисел и вычисляет их среднее арифметическое.
4.Написать программу, которая вводит с клавиатуры последовательность из пяти дробных чисел и после ввода каждого числа выводит среднее арифметическое полученной части последовательности.
5.Написать программу, которая генерирует 10 случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее арифметическое.
6.Написать программу, которая генерирует три последова¬тельности из десяти случайных чисел в диапазоне от 1 до 10, выводит каждую последовательность на экран и вычисляет среднее арифметическое каждой последовательности. Рекомендуемый вид экрана во время работы программы приведен ниже.
*** Случайные числа ***
6 10 4 2 5 8 1 7 7 3 сред.арифм. 5.30
10 3 6 1 10 1 3 8 7 6 сред.арифм. 5.50
5 2 2 5 4 2 2 1 6 10 сред.арифм. 3.90

2.Тема: Операторы цикла итерационного типа.
1. Найти сумму цифр заданного натурального числа n.
2. Дано натуральное число верно ли, что в данном числе сумма цифр больше b, a само число делится на b (b вводить с клавиатуры).
3. Вводится последовательность ненулевых чисел, 0-конец последовательности. Подсчитать, сколько в ней отрицательных чисел, и сумму положительных чисел.
4. Дано не менее трех различных натуральных чисел, за которыми следует 0. Определить три наибольших числа среди них.
5. Дано натуральное число n, найти количество цифр данного числа, больших a (a вводится с клавиатуры);
6. Найти сумму цифр заданного натурального числа n.
7. Дано натуральное число, сколько раз первая цифра встречается в данном числе;
8. Дано натуральное число, верно ли, что данное число начинается на a и заканчивается на b (цифры а и b вводятся с клавиатуры).
9. Дано натуральное число, найти количество четных цифр числа;
10. Дано натуральное число, сколько раз данная цифра а встречается в данном числе (а вводить с клавиатуры).
11. Дано натуральное число, верно ли, что в данном числе сумма цифр больше b, a само число делится на b (b вводить с клавиатуры).
12. Дано натуральное число, найти произведение цифр числа;
13. Дано натуральное число, верно ли, что в данном числе нет данной цифры а (цифру а вводить с клавиатуры).
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 19:13.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025