12. Визначте моделі об'єктів в описаних ситуаціях і встановіть при- чину їх використання замість їхніх реальних аналогів.
ної карти світу.
•на уроках географії учні вивчають рельєф за до фізичної карти світу
•Конструктори АКБ «Антонов» завершили випробування комп'ю-
терної моделі нового літака.
•За до комп'ютерних технологій науковцям вдалося
відтворити вигляд та поведінку прадавніх тварин.
•Курсанти пройшли курс навчання водінню літаків на тренажерах.
•В офтальмології широко застосовується штучний кришталик ока.
function sum (n:integer):integer;
var s:integer;
begin
s:=0;
while (n<>0) do
begin
s:=s+n mod 10;
n:=n div 10;
end;
sum:=s;
end;
begin
write ('A = ');
readln (a);
write ('B = ');
readln (b);
if sum(a) > sum(b) then
writeln ('Сумма цифр 1ого числа больше на ',sum(a)-sum(b))
else if sum(b) > sum (a) then
writeln ('Cумма цифр 2ого числа больше на ',sum(b)-sum(a))
else writeln ('Сумма цифр 1ого числа равна сумме цифр 2ого числа');
readln;
end.