Здесь все 3 примера в одной программе:
program Primer;
var
x, y, z: Real;
begin
Write('Введите значения x,y,z: ');
ReadLn(x, y, z);
WriteLn('1: ', (x + y - z) / (sqr(x) + 2), #10, '2: ', 5 * (2 * x - z) / (3 + sqr(y)), #10, '3: ', (1 + z) * ((x + y / (sqr(x) + 4)) / (2 + 1 / (sqr(x) + 4))));
end.
Объяснение:
#количество чисел - единственное число в первой строке
n = int(input())
#ввод элементов массива - все числа на второй строке
a = [float(x) for x in input().split()]
#сумма отрицательных чисел
sum_neg = sum(x for x in a if x < 0)
iMin, iMax = 0, 0
for i in range(len(a)):
if a[iMin] > a[i]:
iMin = i
if a[iMax] < a[i]:
iMax = i
product = 1
for i in range(iMin+1, iMax):
product *= a[i]
a.sort()
print('sum = {}, product = {}'.format(sum_neg, product))
print('sorted array:', *a)
Program umnochen1;
uses crt;
var a,b,c,d:integer;
BEGIN
a:=random(100);
b:=random(100);
c:=a*b;
write(a,'x',b,'=');
read(d);
if (d=c) then begin
textcolor(2);
writeln('Првильно!')
end
else
begin
textcolor(4);
writeln('Вы ошиблись!');
end;
<span>end.</span>
9. B2 = 4 + 1 = 5; C1 = 6/2 = 3, D1 = 3 - 1 + 1 = 3
На диаграмме области 1, 5, 3, 3
A2 = 1 = A1 - D1 - 1
Ответ: 3
12. 6 - f, 5 - e, 4 - c, 3 - a, 2 - d, 1 - b
Ответ: 1