Program z;
var x,max,n,k:integer;
begin
x:=-1;
max:=-1;
n:=0;
k:=0;
while x<>0 do
begin
readln(x);
k:=k+1;
if x>max then begin max:=x; n:=k; end;
end;
writeln(n);
end.
Import random
def solver():
while True:
key = random.randint(1,1000)
n = input('Введите начало множества: ')
m = input('Введите конец множества: ')
if m <= n or m<= 0 or n <= 0:
return False
if key in range(n,m):
print('YES')
print('число в диапазоне %i - %i' %(n,m))
else:
print('NO')
solver()
• текстовую
• графическую
• звуковую
• видеоинформацию
• мультимедиа информацию
если в паскале то
var
n, i, sum, k : integer;
begin
read (n);
for i := 1 to n do
begin
read (k);
if k mod 15 = 0 then sum := sum + k;
end;
writeln (sum / n);
end.
Легко видеть, что элементы второй строки имеют значение, равное удвоенному значению соответствующих элементов первой строки, увеличенному на единицу.
Поэтому, если в первой строке
1 2 3
то во второй
<em>3 5 7</em>