<span>Определите,какие из перечисленных моделей материальные,а какие информационные. Укажите номера материальных моделей.
1) Макет декорационного оформления театральной постановки.
3) Географический атлас.
4) Объёмная модель молекулы воды.
6) Макет скелета человека.
9) Игрушечный паровоз.</span>
На материнскую плату (она же системная плата) ПК устанавливаются:
слоты расширения, жесткий диск и оперативная память.
(но это только из данного списка. На самом деле там намного больше деталей.)
Type
index='0'..'z';
var
Ch:array[0..255] of integer;
s:string;
i,max,imax:integer;
begin
{ очищаем массив счетчиков }
for i:=0 to 255 do Ch[i]:=0;
Writeln('Введите текст');
Readln(s);
for i:=1 to Length(s) do Inc(Ch[Ord(s[i])]);
max:=Ch[0]; imax:=0;
for i:=33 to 255 do { не рассматриваем непечатаемые символы и пробел}
if max<Ch[i]then begin max:=Ch[i]; imax:=i end;
Writeln('Символ "',Chr(imax),'" встретился ',max,' раз(а)')
end.
<em><u>Тестовое решение:</u></em>
Введите текст
"Что значит имя? Роза пахнет розой, хоть розой назови её, хоть нет." (В.Шекспир)
Символ "о" встретился 9 раз(а)
1000111001(2)=569(10)=1071(8)=239(16), 1517(10)=10111101101(2)=2755(8)=5ED(16), 11123(8)=4691(10)=1001001010<span>011(2)</span>