1. запустите программу несколько раз. объясните, почему при некото-рых запусках треугольники рисуются поверх текста в верхнем левомуглу экрана. измените программу так, чтобы треугольники рисовалисьниже текста (правее текста).2. добавьте в программу возможность ввода длины второго катета. 3. измените
программу так, чтобы длины катетов задавались случай-ным образомuses graphabc; var n, x, y, a : integer; procedure pr_treug (x, y, a,b : integer); var x_c, y_c: integer; begin line(x, y, x + a,y); line(x, y, x, y + b); line(x + a, y, x, y + b); x_c : = x + 2; y_c : = y + 2;
floodfill(x_c,y_c,clrandom); end; begin writeln('ввeдите количество'); read(n); writeln (n); writeln('ввeдите длину катета'); read(a); writeln (a); for var i: = 1 to n do begin x: = random(500); y: = random(400); pr_treug(x, y, a, a); end; end.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var current, past, sum: real;
i, n: integer;
begin
current : = 10;
for i : = 1 to 10 do begin
writeln(i, ' ', current);
past : = current;
current : = current * 1.1;
end;
current : = 10; sum : = 0;
write('n = ');
read(n);
for i : = 1 to n do begin
sum : = sum + current;
past : = current;
current : = current * 1.1;
end;
writeln('за ', n, ' дней: ', sum);
end.
ответ:
1)
объяснение:
как уже было отмечено выше, адекватность модели – это степень ее соответствия реальному объекту. критерием адекватности модели служит только практика, только эксперимент на реальном объекте.
поддаться соблазну безгранично доверять моделям – самое неприятное, что может произойти с исследователем. любая, сколь угодно сложная модель есть , отражающее текущий уровень знаний о свойствах объекта моделирования. в реальной жизни объект моделирования может повести себя не так, как это предсказано его моделью, что может к трагическим последствиям.
примеры:
1. в первой половине 20-го века инженеры, занимающиеся проектированием мостов, чрезвычайно увлекались построением моделей будущих сооружений, зачастую пренебрегая давно известными и хорошо себя зарекомендовавшими моделями. в 1940 году в сша неожиданно обрушился недавно построенный такомский висячий мост. под воздействием порывов ветра в конструкциях моста возникли не предусмотренные расчетами резонансные явления, под воздействием которых мост рухнул в считанные секунды. после этой и некоторых других катастроф стало правилом отрабатывать возможные экстремальные режимы будущих мостов не только на , но и на моделях, подобно тому, как это делается при разработке самолетов.