3D графикаға арналған программалар туралы ақпарат

1)

begin

 var (f, m) := readinteger2;

 var s := 4 * sqr(f) - sqrt(25) + 12 * m;

 write(s);

end.

2)

begin

 var (z, h, n) := readinteger3;

 var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25);

 write(v);

 writeln('Выполнил: ВАШЕ ФИО');

end.

Объяснение:

sqr(x) - возводит число х в квадрат;

sqrt(x) - вычисляет квадратный корень из числа x;

abs(x) - вычисляет модуль числа х.

1)

begin  // Начало программы

 var (f, m) := readinteger2;  // Считываем с клавиатуры значения f и m

 var s := 4 * sqr(f) - sqrt(25) + 12 * m;  // Вычисляем выражение

 write(s);  // Выводим ответ

end. // Конец программы

2)

begin  // Начало программы

 var (z, h, n) := readinteger3;  // Считываем с клавиатуры значения z, h и n.

 var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25);  // Вычисляем выражение

 write(v);  // Выводим ответ

 writeln('Выполнил: ВАШЕ ФИО'); // Здесь вводите свое ФИО

end. // Конец программы

n = int(input('Введите количество чисел: '))

print('Вводите числа по очереди: ')

up = True

k = 0

b = 0

while k < n:

   k+= 1

   a = int(input())

   if up and a < b:

       up = False

   b = a

if up:

   print('Последовательность возрастающая')

else:

   print('Последовательность не возрастающая')

n = int(input('Введите количество чисел: '))

print('Вводите числа по очереди: ')

up = True

k = 0

b = 0

while k < n:

   k+= 1

   a = int(input())

   up = not(up and a < b)

   b = a

if up:

   print('Последовательность возрастающая')

else:

   print('Последовательность не возрастающая')