Вопросы и задания ? 1. Ознакомьтесь с материалами презентации к параграфу, со-
держащейся в электронном приложении к учебнику. Что вы
можете сказать о формах представления информации в пре-
зентации и в учебнике? Какими слайдами вы могли бы до-
полнить презентацию?
2. Что такое модель? В каких случаях используется моделиро-
вание?
3. Подтвердите на примерах справедливость следующих выска-
зываний:
а) одному объекту может соответствовать несколько моделей;
б) одна модель может соответствовать нескольким объектам.
4. Приведите примеры натурных и информационных моделей.
5. В приведённом перечне моделей укажите те, которые могут
использоваться для:
а) представления объектов окружающего мира;
б) объяснения известных фактов;
uses
System.Text.RegularExpressions;
begin
var s:=' - 32 / - 21 ';
s:=RegEx.Replace(s,'\s','');
var a:=RegEx.Matches(s,'(-{0,1}\d+)|[\+\-\*/]');
var n:=a.Count;
var x,y:integer;
var c:char;
case n of
3:begin
x:=StrToInt(a[0].ToString); y:=StrToInt(a[2].ToString);
c:=a[1].ToString[1]
end;
2:begin
x:=StrToInt(a[0].ToString); var s1:=a[1].ToString;
c:=s1[1]; s1[1]:='0'; y:=StrToInt(s1)
end;
else
begin Writeln('Недопустимое выражение'); exit end
end;
WriteFormat('{0} {1} {2} = ',x,c,y);
case c of
'+':Writeln(x+y);
'-':Writeln(x-y);
'*':Writeln(x*y);
'/':Writeln(x/y)
end
end.
Тестовое решение:
-32 / -21 = 1.52380952380952
// PascalABC.NET 3.0, сборка 1128
begin
var s:='4km-549_ffb)5)6';
var t:=s.Where(x->x in ['0'..'9']).JoinIntoString('');
var n:int64;
if TryStrToInt64(t,n) then Writeln(2*n)
else Writeln('Не удалось выделить число')
end.
Тестовое решение:
909912
Затем просто переписываешь эти числа в два ряда
11100000
11000100 ( И пишешь 1 там где друг над другом стоят единицы)
11000000
Теперь переводишь это число в десятичную
Твой ответ . 12.16.192.0 (буквы думаю сам напишешь )