a.append(int(input("Введите число " + str(x + 0) + ": ")))
b = 0
b = a[3]
a[3] = a[1]
a[1] = b
for x in range(0, 20):
print("Число", x + 1, "в массиве:", a[x])
С комментариями:
a = [] # Сначала мы создаем пустой массив
for x in range(1, 21): # и 20 раз (мы пишем 21 так как оно дойдет до числа не включая его)
# P. S. тут мы пишем не <<"Введите число", x..>>, а <<"Введите число" + str(x)..>>. Это потому что в отличии от функции print(), функция input() принимает только 1 аргумент, и нам придется использовать конкатенацию строк, но она сама не преоброзует число в строку, так что нам надо будет использовать функцию str() чтобы это сделать
a.append(int(input("Введите число " + str(x + 0) + ": "))) # спрашиваем у пользователя ввод числа и добавляем его в массив
b = 0 # затем мы создаем переменную b в которой будем хранить значение 4-ого элемента
b = a[3] # присваеваем переменной b значение 4-ого элемента
a[3] = a[1] # присваем значение 2-ого элемента 4-ому, пока что и 2-ой и 4-ый элемент имеют значение 2-ого элемента
a[1] = b # и теперь присваеваем второму элементу значение четвертого элемента
# P. P. S. Мы пишем не a[2] и a[4], а a[1] и a[3] потому, что элементы массива в большинстве языков программирования начинаются с нуля
for x in range(0, 20): # и теперь 20 раз (тут мы все-таки ставим от 0 до 20 (смотри P.P.S.) и добавляем 1 когда печатаем)
print("Число", x + 1, "в массиве:", a[x]) # мы выводим соответствующее число массива
1) Var n,m,max,min:integer; Begin write('Введите число: '); readln(n); min:=9; max:=0; while n>0 do begin m:=n mod 10; if m<min then min:=m; if m>max then max:=m; n:=n div 10; end; writeln('Максимальное число: ',max); writeln('Минимальное число: ',min); End. 2) var i,count: integer; n,s:string; begin writeln('Введите число: '); readln(s); writeln('Введите цифру: '); readln(n); for i:=1 to length(s) do if(s[i]=n)then count:=count+1; writeln('Количество раз, когда встречается цифра = ',count); end.
Без комментариев:
a = []
for x in range(1, 21):
a.append(int(input("Введите число " + str(x + 0) + ": ")))
b = 0
b = a[3]
a[3] = a[1]
a[1] = b
for x in range(0, 20):
print("Число", x + 1, "в массиве:", a[x])
С комментариями:
a = [] # Сначала мы создаем пустой массив
for x in range(1, 21): # и 20 раз (мы пишем 21 так как оно дойдет до числа не включая его)
# P. S. тут мы пишем не <<"Введите число", x..>>, а <<"Введите число" + str(x)..>>. Это потому что в отличии от функции print(), функция input() принимает только 1 аргумент, и нам придется использовать конкатенацию строк, но она сама не преоброзует число в строку, так что нам надо будет использовать функцию str() чтобы это сделать
a.append(int(input("Введите число " + str(x + 0) + ": "))) # спрашиваем у пользователя ввод числа и добавляем его в массив
b = 0 # затем мы создаем переменную b в которой будем хранить значение 4-ого элемента
b = a[3] # присваеваем переменной b значение 4-ого элемента
a[3] = a[1] # присваем значение 2-ого элемента 4-ому, пока что и 2-ой и 4-ый элемент имеют значение 2-ого элемента
a[1] = b # и теперь присваеваем второму элементу значение четвертого элемента
# P. P. S. Мы пишем не a[2] и a[4], а a[1] и a[3] потому, что элементы массива в большинстве языков программирования начинаются с нуля
for x in range(0, 20): # и теперь 20 раз (тут мы все-таки ставим от 0 до 20 (смотри P.P.S.) и добавляем 1 когда печатаем)
print("Число", x + 1, "в массиве:", a[x]) # мы выводим соответствующее число массива
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;
max:=0;
while n>0 do
begin
m:=n mod 10;
if m<min then min:=m;
if m>max then max:=m;
n:=n div 10; end;
writeln('Максимальное число: ',max);
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.