Задания для самостоятельного выполнения.

Составить блок-схему алгоритма. Значения заданных параметров ввести с клавиатуры.

1. Значение наибольшего из трех параметров a, b, c вывести на экран монитора, если это значение > 0 и это значение четное, иначе выести сообщение “Результат отрицательный”.

2. Найти сумму значений параметров a и b. Если значение суммы > 0, вывести ее на экран монитора. Если она < 0, на экран монитора вывети результат деления суммы на значение наименьшего из двух параметров a, b. Если наименьшее значение = 0, ыывести сообщение “Знаменатель = 0”. Вывод численных значений предварить выводом соответствующих сообщений.

3. Вывести на экран монитора номер наименьщего из значений трех параметров a₁, a₂, a₃ или сообщение “Параметры равны”, если значения параметров равны.

4. Значение наименьшего из трех параметров a, b, c вывести на экран монитора, если это значение ≤ x и это значение кратно 3, иначе выести сообщение “Результат отрицательный”.

5. Найти разность значений параметров a и b. Если значение разности < 0, вывести ее на экран монитора. Если она = 0, на экран монитора вывети сообщение “Разность = 0”. Если она > 0, на экран монитора вывестирезультат деления разности на значение наибольшего из двух параметров a, b. Вывод численных значений предварить выводом соответствующих сообщений.

6. Вывести на экран монитора номер наибольшего из значений трех параметров a₁, a₂, a₃ при условии, что ниабольшее значение больше x и значения этих параметров не равны или сообщение “Результат отрицательный”, в противном случае.

7. Значение наибольшего из трех параметров a, b, c вывести на экран монитора, если это значение > x и это значение < (a+b), иначе выести значение наименьшего из трех параметров. Вывод численных значений предварить выводом соответствующих сообщений.

8. Найти сумму значений параметров a и b. Если значение суммы > 0 и она кратна 5, вывести ее на экран монитора. Если она < 0, на экран монитора вывети результат деления суммы на значение наибольшего из двух параметров a, b. Если наименьшее значение = 0, ыывести сообщение “Знаменатель = 0”. Вывод численных значений предварить выводом соответствующих сообщений.

9. Вывести на экран монитора номер наименьщего из значений трех параметров a₁, a₂, a_3, если это значение > 0 и кратно 3, или сообщение “Результат отрицательный”, в противном случае.

10. Значение наименьшего из трех параметров a, b, c вывести на экран монитора, если это значение ≤ (a-b) и это значение кратно 5, иначе выести значениесуммы (a + b + c). Вывод численных значений предварить выводом соответствующих сообщений.

11. Найти разность значений параметров a и b. Если значение разности > x, вывести ее на экран монитора. Если она = 0, на экран монитора вывети сообщение “Разность = 0”. Если она < x, на экран монитора вывести результат деления разности на значение наименьего из двух параметров a, b. Вывод численных значений предварить выводом соответствующих сообщений.

12. Вывести на экран монитора номер наибольшего из значений трех параметров a₁, a₂, a₃ при условии, что ниабольшее значение кратно 2 и значения этих параметров не равны или сообщение “Результат отрицательный”, в противном случае.

13. Значение наименьшего из трех параметров a, b, c вывести на экран монитора, если это значение < 0 и это значение нечетное, иначе выести сообщение “Результат отрицательный”.

14. Найти разность значений параметров a и b. Если значение разности < 0, вывести ее на экран монитора. Если она > 0, на экран монитора вывети результат деления суммы на значение наименьшего из двух параметров a, b. Если наименьшее значение = 0, ыывести сообщение “Знаменатель = 0”. Вывод численных значений предварить выводом соответствующих сообщений.

15. Вывести на экран монитора номер наибольшего из значений трех параметров a₁, a₂, a₃ или сообщение “Параметры равны”, если значения параметров равны.

16. Значение наибольшего из трех параметров a, b, c вывести на экран монитора, если это значение ≤ x и это значение кратно 5, иначе выести сообщение “Результат отрицательный”.

17. Найти сумму значений параметров a и b. Если значение суммы > 0, вывести ее на экран монитора. Если она = 0, на экран монитора вывети сообщение “Сумма = 0”. Если она < 0, на экран монитора вывестирезультат деления суммы на значение наибольшего из двух параметров a, b. Вывод численных значений предварить выводом соответствующих сообщений.

18. Вывести на экран монитора номер наименьшего из значений трех параметров a₁, a₂, a₃ при условии, что наименьшее значение больше x и абсолютные значения этих параметров не равны или сообщение “Результат отрицательный”, в противном случае.

19. Значение наименьшего из трех параметров a, b, c вывести на экран монитора, если это значение < x и это значение < (a-b), иначе выести значение наибольшего из трех параметров. Вывод численных значений предварить выводом соответствующих сообщений.

20. Найти разность значений параметров a и b. Если значение разности > 0 и она кратна 2, вывести ее на экран монитора. Если она < 0, на экран монитора вывети результат деления разности на значение наибольшего из двух параметров a, b. Если наибольшее значение = 0, ыывести сообщение “Знаменатель = 0”. Вывод численных значений предварить выводом соответствующих сообщений.

21. Вывести на экран монитора номер наибольшего из значений трех параметров a₁, a₂, a_3, если это значение < 0 и кратно 2, или сообщение “Результат отрицательный”, в противном случае.

22. Значение наибольшего из трех параметров a, b, c вывести на экран монитора, если это значение ≤ (b-c) и это значение кратно 2, иначе выести значениесуммы (a + b + c). Вывод численных значений предварить выводом соответствующих сообщений.

23. Найти сумму значений параметров a и b. Если значение суммы > x, вывести ее на экран монитора. Если она = 0, на экран монитора вывети сообщение “Сумма = 0”. Если она < x, на экран монитора вывести результат деления суммы на значение наибольшего из двух параметров a, b. Вывод численных значений предварить выводом соответствующих сообщений.

24. Вывести на экран монитора номер наименьшего из значений трех параметров a₁, a₂, a₃ при условии, что ниабольшее значение кратно 4 и значения этих параметров не равны или сообщение “Результат отрицательный”, в противном случае.

Тема 2. Алгебраические вычисления.

Некоторые стандартные алгебраические функции.

Алгебраические функции	Функции Паскаль
| X |	ABS(X)
eX	EXP(X)
LN X	LN(X)
X2	SQR(X)
	SQRT(X)
SIN X	SIN(X)
COS X	COS(X)
ARC TG X	ARCTAN(X)
π	PI

Некоторые стандартные алгебраические функции не представленные в Паскале в явном виде.

Пример 1.Вычислить значения.

,

при a = 0,59; z = -4,8.

Значения параметров ввести с клавиатуры. Исходные данные и результаты вычислений вывести на экран монитора.

Program pr1;

uses crt;

var a, z ,x: real;

p, t, y, c: real;

begin clrscr;

write(‘Ведите значения a, z, x -> ‘);

readln(a, z, x);

c:= sin(a+x*x)/cos(a+x*x);

y:=a*c*sqr(c)+sqrt(z*z/(a*a+x*x));

p:=(ln(a+x*x))/ln(10)+sqr(sin(z/a));

if x >= 1 then t:=Exp(a*ln(x)) else

t:= cos(x);

writeln('При а=',a:5:2,' z=',z:4:1,' x=',x:4:1);

writeln ('p=',p:9:4,' y=',y:9:4,' t=',t:9:4);

readkey

end.

Результаты вычислений:

При а=0.59 z=-4.8 x=2.1

p=1.6217 y=21.6350 t=1.5492