TURBO PASCAL |
Новости |
Практическое задание N 1. 6
1. Определить
ваши действия в зависимости от дня недели.
Например, суббота
-
еду в баню, воскресенье
- еду в гости и т. д. Программа
запрашивает ввод дня недели и выводит на
экран ваши действия в зависимости от
составленного расписания.
2. Определить
вид функции в зависимости от значения
аргумента: y=7
при х<-7, у=-х
при -7=<х<0,
у=х при 0<х<=5,
у= 5 при х>5. Программа запрашивает ввод
значения "х" и выводит на экран вид
функции "у".
3. Рассчитать
значение функции Y= хN в зависимости от
значения "х" с выбором вида формулы:
для случая аргумента х>0 функция Y= exp(N*ln(x)), при
х<0 преобразовать "х" в положительное
число x= abs(x), при х= 0
функция Y= 1.
4. Рассчитать
значение функции Y= 1/ Ö х в
зависимости от значения "х" с выбором
вида формулы: для случая аргумента х>0
функция Y= 1/sqrt(x), при
х<0 преобразовать "х" в положительное
число x= abs(x), при х= 0
вывести надпись: " Деление на ноль".
Для разложения
целого числа на цифры удобно применять
операции: MOD и DIV.
Например, если
дано трехзначное число "N" ( "N"
соответствует "X1X2X3" ),
то цифры: X1X2X3,
составляющие это число
определяются блоком операторов:
X3:= N
mod 10; N:= N div 10; X2:= N mod
10; N:= N div 10; X1:= N;
Если требуется определить, делится ли вещественное число
"A" нацело на число "B",
то можно применять функции Frac(x); и Int(x);
например:
x:= A/B;
If
Frac(x) = 0 then writeln('Число "A" делится нацело на число
"B"'); If Int(x) = x
then writeln('Число
"A" делится нацело на число "B"'); |
(с) Все права защищены. По всем интересующим вопросам прошу писать электронный адрес |