#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 писать в одной строке!
Размер книги = 512 Кб
Ёмкость компакт-диска = 700 Мб = 716800 Кб
Ск-ко можно разместить ?
Отв.: 1400 книг.