Выделить часть текста. Установить указатель мыши внутри выделенного фрагмента. Нажать на клавиатуре клавишу “Ctrl” и, не отпуская ее нажать на левую кнопку мыши. Удерживая, нажатыми клавиши на клавиатуре и мыши, переместить указатель мыши в то место, где должна находится копия части текста. Последовательно отпустить левую кнопку мыши и клавишу “Ctrl” на клавиатуре.
В2 - Форматирование - процесс изменения внешнего вида текста.
В3 - Каждый символ кодируется 16 битами или двумя байтами. Всего символов 32, включая пробелы. Следовательно, ответ 512 бит.
var n,a,k,sum,i,j: integer; s: string; begin sum:=0; write ('Введите количество чисел: '); readln (n); for i:=1 to n do begin write ('Введите число: '); readln (a); Str(a,s); k:=0; for j:=1 to length(s) do if s[j]='5' then k:=k+1; if k=2 then sum:=sum+a; end; writeln ('Sum = ',sum); end.
2 вариант через div и mod
var n,a,x,k,sum,i: integer; begin sum:=0; write ('Введите количество чисел: '); readln (n); for i:=1 to n do begin write ('Введите число: '); readln (a); x:=abs(a); k:=0; while x>0 do begin if x mod 10 =5 then k:=k+1; x:=x div 10; end; if k=2 then sum:=sum+a; end; writeln ('Sum = ',sum); end.
пример результата:
Введите количество чисел: 3 Введите число: 550001 Введите число: -550000 Введите число: 123456 Sum = 1
А1 - 3
А2 - 2
А3 - 3
А4 - 3
А5 - 1
В1 - Копирование с клавиши “Ctrl”.
Выделить часть текста. Установить указатель мыши внутри выделенного фрагмента. Нажать на клавиатуре клавишу “Ctrl” и, не отпуская ее нажать на левую кнопку мыши. Удерживая, нажатыми клавиши на клавиатуре и мыши, переместить указатель мыши в то место, где должна находится копия части текста. Последовательно отпустить левую кнопку мыши и клавишу “Ctrl” на клавиатуре.В2 - Форматирование - процесс изменения внешнего вида текста.
В3 - Каждый символ кодируется 16 битами или двумя байтами. Всего символов 32, включая пробелы. Следовательно, ответ 512 бит.
В4 - 256=2^8
8 бит на символ
30*70*5*8 = 84000
84000 : 8 = 10500 байт