Возьмем число 56 и его надо перевести из 10-ой в 2-ую. Тут надо делить на 2 с остатком
56:2= 28+0-остаток
28:2=14+0
14:2=7+0
7:2= 3+1
3:2=1+1
1:2= 1+0
и записываем остатки снизу вверх
011000
Var a:array[1..10] of integer;
i,b: integer;
begin
for i:=1 to 10 do readln(a[i]);
readln(b);
for i:=1 to 10 do if a[i]=b then writeln(i);
end.
Ответ:
14
Объяснение:
а = 7
b = 4
if (если) a > b: (то выполняется) b += 5
else: (иначе (когда a <= b) выполняется) а += 7
(x += y прибавляет значение левой переменной к правой, равносильно x = x + y)
if (если) 7 > 4 (правда): (то ВЫПОЛНЯЕТСЯ) b += 5
b = b + 5 = 4 + 5 = 9
else: (иначе (когда 7 <= 4 - неправда) не выполняется) а += 7
а = 7
b = 9
if (если) a > b: (то выполняется) a += 12
else: (иначе (когда а <= b) выполняется) а += 7
(x += y прибавляет значение левой переменной к правой, равносильно x = x + y)
if (если) 7 > 9 (неправда): (то не выполняется) а += 12
else: (иначе (когда 7 <= 9 - правда) ВЫПОЛНЯЕТСЯ) а += 7
а = а + 7 = 7 + 7 = 14
а = 14
b = 9
Например, врач.
В наше время компьютер есть почти у каждого. Но не все пользуются им по специальности, так как, например, программист или врач. Врачу в наше время необходим компьютер также, как и руки. С помощью компьютера можно уточнять о болезни, добывать информацию, записывать пациентов на приемы, связываться с кем-нибудь, кто необходим. Так же сейчас врачи почти всегда используют компьютеры для того, чтобы следить все ли в порядке с их пациентом во время операции или ещё чего-нибудь