Const n=10;
var a:array[1..n] of integer;
max,min,i:integer;
begin
Randomize;
for i:=1 to n do begin
a[i]:=random(51);
write(a[i],' ');
end;
writeln;
max:=a[1];
min:=a[1];
for i:=1 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
if i mod 2 = 1 then a[i]:=min else a[i]:=max;
end;
for i:=1 to n do write(a[i],' ');
writeln;
end.

Пример:
<span>31 35 3 5 26 46 9 31 30 11
31 35 3 35 3 46 3 46 3 46 </span>

0 0

4 года назад

Прочитать ещё 2 ответа

Что-нибудь из этого сделайте в C++. PLEASE!! 1) Определить температуру в Кильвинах, Фарингйтах, и Ранкинах. Если известно что в

П а в е л [7]

Это 5
#include <iostream>
using namespace std;
int main() {
double a;
int b, proizv=1;
cin>>a;
while(a>0) {
b=a%10;
if(b%2!=0)proizv*=b;
a/=10;
} cout<<proizv<<endl;
return 0;
}
Это 6
#include <iostream>
using namespace std;
int main() {
int a;
int b, max=-1000000, proizv=1;
cin>>a;
do {
b=a%10;
if(b>max)max=b;
if(b%2!=0)proizv*=b;
a/=10;
}while(a>0);
cout<<proizv<<' '<<max<<endl;
return 0;
}

0 0

4 года назад

Прочитать ещё 2 ответа

Назовите преимущества языка программирования C++ от других программ

irina-raz [32]

Содержит средства для создания программ практически любого назначения, от низкоуровневых до сложных программных комплексов разного назначения

0 0

4 года назад