#include <bits/stdc++.h>
using namespace std;
long long a,b,c,A,B,count1=0,d,F[17],sum=0,min1=10000,minI;
int main()
{
for(int i=1;i<=10;i++){
F[i]=rand()%30;
if(F[i]>15){
F[i]=F[i]/3;
}
if(F[i]<min1){
min1=F[i];
minI=i;
}
sum+=F[i];
cout<<F[i]<<" ";
}
cout<<endl;
cout<<"Suma: "<<sum<<endl;
cout<<"minIndex: "<<minI<<endl;
return 0;
}
11 5 4 10 9 4 6 6 7 14
Suma: 76
minIndex: 3
Объяснение:
Тут и так всё понятно
program cifry;
var p: integer;
var c: integer;
var s: integer;
var d: byte;
BEGIN
writeln('Программа расчёта разности произведения и суммы цифр трёхзначного числа.');
c:=100+random (900);
writeln('Число -', c);
p:=1;
s:=0;
d:=c mod 10;
s:=s+d;
p:=p*d;
c:=c div 10;
d:=c mod 10;
s:=s+d;
p:=p*d;
c:=c div 10;
d:=c mod 10;
s:=s+d;
p:=p*d;
c:=c div 10;
write('Разность произведения и суммы цифр числа -', p-s);
end.
Объяснение:
Нуэно ставить ";" + переменная var
var p:integer, Нужно запускать програму и останавливать BEGIN , end. write писать в одной строке!
Обозначим через a, b стороны прямоугольника, через d его диагональ, S - площадь прямоугольника (сечения).
Для вписанного в окружность четырёхугольника произведение длин диагоналей равно сумме произведений длин пар противоположных сторон, следовательно, для прямоугольника можно записать d2 = a2+b2. Так как S=a·b, то b=S/a, отсюда d2 = a2 + S2/a2. Следовательно, S2 = a2(d2-a2).
Для удобства будем рассматривать квадрат площади, так как при максимальном значении площади будет максимальным и её квадрат.
Длина диагонали вписанного в окружность прямоугольника равна диаметру этой окружности, поэтому S2 = a2((2·20)2-a2) = a2(1600-a2) = 1600a2-a4
Для того, чтобы найти максимум или минимум функции, нужно взять от неё производную и приравнять к нулю.
( 1600a2-a4)' = 3200a-4a3
3200a-4a3 = 0
a(3200-4a2) = 0
a=0 - в этом случае никакого бруска не будет
3200-4a2 = 0
a2=800
a = 20√2 см
Квадрат площади сечения в этом случае будет равен S2 = 800·1600 - 8002 = 640000 см4
Площадь будет равна S = √640000 = 800 см2
Длина второй стороны прямоугольника будет равна b = 800/20√2 = 20√2 см.
Для того, чтобы сечение балки было максимальным, нужно, чтобы оно представляло собой квадрат со сторонами 20√2 см, тогда площадь сечения будет равна 800 см2.