Условный оператор
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: доклады о животны, мировая торговля
| Добавил(а) на сайт: Быков.
Предыдущая страница реферата | 1 2 3 4 5 6 | Следующая страница реферата
End
ELSE
IF (X < 0) OR (Y < 0) THEN
Begin
X = X + 0.5;
Y = Y + 0.5
End
ELSE
IF NOT (((X >= 0.5) AND (X <= 2))
OR ((Y >= 0.5) AND (Y <= 2)))
THEN
Begin
X = X / 10;
Y = Y / 10
End;
WriteLn('Результат:'); WriteLn('X= ', X:10:6); WriteLn('Y= ', Y:10:6)
END.
Задача 2. Дано
действительное число a. Вычислить f(a), если 
Program Usl1;
Var A, F : Real;
Begin
WriteLn('Введите действительное число: '); ReadLn(A);
IF A <= 0 THEN
F = 0
Рекомендуем скачать другие рефераты по теме: сочинения по литературе, реферат по математиці.
Категории:
Предыдущая страница реферата | 1 2 3 4 5 6 | Следующая страница реферата
Главная