Решение задач в Delphi 7

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

Ответить
Надежда_ИСУ
Сообщения: 7
Зарегистрирован: 24 янв 2013, 13:20

Доброго времени суток, дорогие форумчане!!!

Возникла проблема с решением задач на delphi!
А в понедельник уже экзамен, а это и есть допуск к экзамену!
Очень прошу помочь в данной ситуации...
Вот собственно и задачи:

1. Оператор выбора (Case).
Дано целое число K. Вывести строку-описание оценки,соответствующий числу K (1-плохо,2-неудовлетворительно,3-удовлетворительно,4-хорошо,5-отлично).Если K не лежит в диапазоне 1-5, то вывести строку "Ошибка".
2. Цикл с параметром (For).
Даны два целых числа A и B(A< B).Вывести в порядке возрастания все целые числа,расположенные между A и B (включая сами числа A и B), а также количество N этих чисел.
3. Цикл с параметром (For).
Дано вещественное число X (|X|<1) и целое число N(>0). Найти значение выражения
x+1*x(3 степень)/(2*3)+1*3*x(5 степень)/(2*4*5)+...+
1*3...(2*N-1)*x(2*n+1 степень))/(2*4...(2*N)*(2*N+1)).
Полученное число является приближенным значению функции arcsin в точке X.
4. Цикл с условием (WHILE).
Даны положительные числа A и B (A> B). На отрезке длины A размещено максимально возможное кол-во отрезков длины B(без наложений).Не используя операций умножения и деления, найти кол-во отрезков B, размещёных на отрезке A.
5. Цикл с постусловием (Repeat/Do-WHILE).
Дано целое число N(>1). Если оно является простым, т.е. не имеет положительных делителей, кроме 1 и само на себя, то вывести TRUE, иначе вывести FALSE.
6. Одномерный массив (Array).
Дано целое число N(>0). Сформировать и вывести целочисленный массив размера N, содержащий степени двойки от первой до N-й :2,4,8,16,...
7. Последовательности (Series).
Даны десять вещественных чисел. Найти их произведение.

Заранее, большое СПАСИБО!!!
Ответить