Даны три маски файла, однозначно определяюших имя файла. известно, что имя этого файла состоит из 10 символов, а расширение из 3. в ответе укажите имя этого файла ( например: spravka.doc) ? *sk*v? ? *? .j** m*? ? **ci*? .**g *o? ? o? **ty.*p

Moskovcity.jpg  название  файла

Var   a,b,c,min: integer; begin write('введите a: '); readln(a); min: =a; write('введите b: '); readln(b); if b< min then min: =b; write('введите c: '); readln(c); if c< min then min: =c; writeln('наименьшее: ',min); end.для vbasub z()dim a as integerdim b as integerdim c as integerdim min as integera = inputbox("введите  a: ") min = ab = inputbox("введите  b: ")if b < min then min = bc = inputbox("введите  c: ")if c < min then min = cmsgbox ("наименьшее: " & min)end subдля наибольшегоsub z() dim a as integer dim b as integer dim c as integer dim max  as integer a = inputbox("введите  a: ") max= a b = inputbox("введите  b: ") if b > max  then  max  = b c = inputbox("введите  c: ") if c > max  then  max  = c msgbox ("наибольшее: " &   max  ) end sub

Что бы перевести и 2-ной c.c  в десятичную,необходимо разложить  число по ,над числом    1100,начиная с конца  (т.е от знака равно) и    начиная с нулевого разряда,т.е 1100(2)=(расставляем разряды над числом) (2) =(теперь для того чтобы перевести из 2-ной в 10-ную,необходимо разложить число на множители,  умножая  на основание данной с.с и расставляя степень числа)1* +1* +0* +0* =(затем возводим основание с.с в степень данного числа)1*8+1*4+0*2+0*1=(в итоге перемножаем и складываем)8+4+0+0=(после сложение получилось число в 10-ной с.с)  12(10), то что это система счисления,записывается нижним индексом и без скобок,т.е старшей  сестре 12 лет, если она пошла в школу с 111, то это 111(2)=  = =1*4+1*2+1*1=4+2+1=7(10)  > сестра пошла в школу с 7-ми лет, тут 7  лет  -  1  кл, 8  лет  - 2  кл,   9  лет  - 3  кл,   10  лет  - 4  кл, 11 лет - 5 кл, 12 лет -  6 кл а младше сестре 100(2)=  =  =1*4+0*2+0*1=4 (10) года