<h3>var a:array [1..100001] of longint;
</h3><h3>r,k:real;
</h3><h3>s:longint;
</h3><h3>begin
</h3><h3> t:=1;k:=0;
</h3><h3> while t<>0 do
</h3><h3> begin
</h3><h3> read(t);
</h3><h3> inc(k);
</h3><h3> a[k]:=t;
</h3><h3> s:=s+t;
</h3><h3> end;
</h3><h3> r:=s/k;
</h3><h3> if a[k+1 div 2]>r then writeln('Yes') else writeln('No');
</h3><h3>end.
</h3><h3 />
Program chisla;
uses crt;
var a,b,c : integer;
begin
Write('Введите два числа: ');
Readln(a,b);
if a>b then c:=a-b else c:=b-a;
Writeln('Разность чисел равна ',c);
end.
#include <iostream>
using namespace std;
int main() {
cout << 7 * 8 / 2; // S = a * h / 2;
return 0;
}
=========================================================
#include <iostream>
using namespace std;
int main() {
int d;
cout << "d = ";
cin >> d;
cout << d * 12 / 2; // S = d1 * d2 / 2;
return 0;
}
=========================================================
#include <iostream>
using namespace std;
int main() {
int ml, botb;
cout << "Enter middle line = ";
cin >> ml;
cout << "Enter the bottom base = ";
cin >> botb;
cout << "The top base = " << 2 * ml - botb;
return 0;
}
Роль информатики в моделировании. Она помогает получить знания об объекте, процессе,явлении с целью получения боллее наглядных,точных знаний.
Можно выделить несколько этапов моделирования
1. Постановка задачи
2. Проанализировать объект моделирования
3. Построить модель
4. Провести компьютерный эксперимент
5. Проанализировать результаты