Не так уж и трудно, если подумать...
program Project2;
var
n,a,b,c,i,k,max,min: longint;
inp,outp: text;
begin
assign(inp,'input.txt');
reset(inp);
assign(outp,'output.txt');
rewrite(outp);
readln(inp,n);
max:=0;
min:=0;
c:=0;
for i:=1 to n do
begin
read(f1,a);
if i=1 then
b:=a;
if a>max then
max:=a;
k:=a-c;
c:=a;
if k<0 then
begin
k:=abs(k);
min:=min+k;
if k>min then
min:=k;
end;
end;
max:=max-b;
write(outp,max,' ',min);
close(inp);
close(outp);
end.
C++
#include <iostream>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian"); // Добавление русского языка
int N;
int *A, *B;
int sub = 0, mult = 1;
cout << "Введите размерность массивов: ";
cin >> N;
A = new int[N];
B = new int[N];
cout << "Инициализация массива A (введите " << N << " элементов): ";
for (int i = 0; i < N; i++)
{
cin >> A[i];
}
cout << "Инициализация массива B (введите " << N << " элементов): ";
for (int i = 0; i < N; i++)
{
cin >> B[i];
}
// Подсчет суммы и произведения всех элементов массива
for (int i = 0; i < N; i++)
{
sub = sub + A[i] + B[i];
mult = mult*A[i] * B[i];
}
cout << "Сумма всех элементов массивов: " << sub << endl;
cout << "Произведение всех элементов массивов: " << mult << endl;
return 0;
}
Синих карандашей = 32*0,5=16
Зеленых карандашей = 32*0,25=8
Желтых = 32* 0,125=4
Красных = 32* 0,0625=2
16+8+4+2=30
Значит белых карандашей 32-30=2
var i,min:integer;
a:array[1..10] of integer;
begin
randomize;
for i:=1 to 10 do begin
a[i]:=random(45)-22;
write(a[i],' ');
end;
writeln;
for i:=1 to 10 do begin
if a[i]<0 then min:= min+1;
end;
writeln('Количество отрицательных элементов:',min);
end.
