Max=0
Min=30000
x=int(input())
while x:
if x>Max:
Max=x
if x<Min:
Min=x
print(Max,Min)
program P1;
uses
crt;
var
mas : array[1..20] of integer;
i,j,k : integer;
tmp : string;
begin
clrscr;
writeln('Start array: ');
for i := 1 to 20 do
begin
mas[i] := random(100);
write(mas[i],' ');
end;
for i := 1 to 20 do
begin
if mas[i] mod 2 = 0 then
mas[i] := 0;
end;
for i := 1 to 20 do
begin
if mas[i] = 0 then
begin
for j := 20 downto i do
if mas[j] <> 0 then
begin
k := mas[j];
mas[j] := mas[i];
mas[i] := k;
end;
end;
end;
writeln('');
writeln('Result array: ');
for i := 1 to 20 do
write(mas[i],' ');
readln(tmp);
read(tmp);
end.
Первая проверка a < b = 100< 12 - нет, уходим по стрелке справа
Вторая проверка b<c = 12 < 100 - да, уходим по стрелке слева
d:=b то есть d:= 12
вывод d = 12
Ответ: 12.
//Task 4
int m;
std::cin >> m;
std::cout << (m%2==0?m-2:m-1);
// Task 5
int a = 0,b,n;
std::cin>>n;
for(int i = 0; i <= n; i ++)
a += i*i;
b = (n * (n + 1) * (2*n + 1))/6;
std::cout<<a<<'='<<b;
// Task 6
int x = 0;
for(int i = 2; x + i < 45;i++)
{
x+=i;
std::cout<<x<<' ';
}
// Task 7
int mult = 1;
int n;
double sum;
std::cin>>n;
for(int i = 1; i < n; i++)
{
sum+=(1/i) * mult;
mult *= -1;
}
std::cout<<sum;
Нужно изучить строение машин электронику компьютеры что позволяет компьютерам реализовать информацию перерабатывать и знать технологию электронику