Определите значение переменной f после выполнения следующего фрагмента программы а: =624897 в: =а div 1000 c: =( b+ c ) mod 100 d: =(b+c) mod 10 f: =с*d
Div - целая часть, полученная от деления mod - остаток, полученный от деления С=0???, если нет, то пересчитай А: =624897 В: =а div 1000 =624 C: =( B+ C ) mod 100 =(624+0) mod 100=2 D:=(B+C) mod 10 =(624+2) mod 10=6 F:=С*D=2*6=12
Const nn=100; var a:array[1..nn] of integer; i,n,s1,s2:integer; begin Write('Введите размер массива n: '); Read(n); Randomize; Writeln('Исходный массив'); for i:=1 to n do begin a[i]:=Random(3000)+1000; Write(a[i]:5) end; Writeln; Writeln('Результаты'); for i:=1 to n do begin s1:=(a[i] div 1000)+(a[i] div 100) mod 10; s2:=(a[i] div 10) mod 10+a[i] mod 10; if s1=s2 then Write(a[i]:5) end end.
Начинаем разбор исходной строки. "25" - первый операнд (за ним следует символ-терминатор Т); "12" - второй операнд (за ним терминирующий знак операции -); "-" - знак операции. Можно вычислять: 25 - 12 = 13 Теперь "13" подставляем на место первого операнда и продолжаем читать строку. "T" - терминирующий символ, он тут для соблюдения синтаксиса; "2" - второй операнд (за ним терминирующий знак операции +); "+" - знак операции. Можно вычислять: 13 + 2 = 15 Теперь "15" подставляем на место первого операнда и продолжаем читать строку. "T" - терминирующий символ, он тут для соблюдения синтаксиса; "45" - второй операнд (за ним терминирующий знак операции +); "+" - знак операции. Можно вычислять: 15 + 45 = 60
Исходное выражение просмотрено до конца, алгоритм разбора закончен. ответ: б) 60
mod - остаток, полученный от деления
С=0???, если нет, то пересчитай
А: =624897
В: =а div 1000 =624
C: =( B+ C ) mod 100 =(624+0) mod 100=2
D:=(B+C) mod 10 =(624+2) mod 10=6
F:=С*D=2*6=12