Раньше, во времена DOS и даже еще раньше, одному символу соответствовал один байт:
Посчитаем символы
1 З
2 д
3 р
4 а
5 в
6 с
7 т
8 в
9 у
10 й
11,
12 пробельный символ
13 П
14 е
15 т
16 я
17 !
Итого 17 байт информации.
В настоящее время похожая однобайтова кодировка все еще применяется и называется ASCII.
Но более распространен utf-8. В нем русские символы занимают по два байта.
Итого в сообщении 14 русских сиволов (28 байт) + 2 знака препинания(2 байта) + пробел (один байт) итого 31 байт.
Существует и двухбайтовый unicode там каждому символу ставятся в соответсвие 2 байта: итого 34 байта.
И даже 4 байтовый юникод:
68 байт.
В Вашей задаче ответ скорее всего 17 байт (первый вариант)
Var
x:double;
begin
x:=102;
while x<=999 do begin Writeln(x,' ',exp(ln(x)/3)); x:=x+3 end;
end.
Результат выполнения программы:
102 4.67232872835526
105 4.71769398031653
108 4.7622031559046
111 4.80589553370533
114 4.84880758583988
117 4.89097324650875
120 4.93242414866094
123 4.97318983326859
126 5.01329793496458
129 5.05277434720856
132 5.09164336965949
135 5.12992784003009
138 5.16764925236362
141 5.2048278633942
144 5.24148278841779
147 5.27763208790408
150 5.31329284591305
. . .
960 9.86484829732188
963 9.87511349546425
966 9.8853573964768
969 9.89558011047944
972 9.90578174668388
975 9.91596241340387
978 9.92612221806536
981 9.93626126721644
984 9.94637966653718
987 9.95647752084936
990 9.96655493412597
993 9.97661200950066
996 9.98664884927706
999 9.99666555493786
Ответ:
1.информатика
2.в разных видах;числовая
3.операции;передавать
4.информацию,зрения,размышлений,информацию,наблюдать
Var a,b:array [1..5] of longint;
c:array [1..10] of longint;
i:integer;
begin
{for i:=1 to 5 do
begin
read(a[i]);
end;
for i:=1 to 5 do
begin
read(b[i]);
end;} Это раскомментировать, если надо считывать массив из файла
for i:=1 to 10 do
begin
if i<6 then c[i]:=a[i] else c[i]:=b[i-5];
end;
end. // В массив c записываются значение массивов a,b
Монитор ,системный блок , клавиатура и мышь
