Поделитесь своими знаниями, ответьте на вопрос:
1.Об'єкт, для якого створюється модель, називають... прототипоморигіналомпроекцієювідображенням2.Оберіть матеріальні моделі глобуссхема ліній метрополітенуіграшковий літакрецепт стравиформула площі прямокутникапластиковий макет будинкузменшена копія скелету людини3.Оберіть інформаційні моделі карта Українинотний запис піснілялькаформула хімічної реакціїграфік зміни температуримініатюрна копія вітрильникастатуетка Ейфелевої вежі
а) var a:array[1..3] of integer;
s, i: integer;
begin
begin
writeln('Vvedite chislo', i - );
readln(a[i]);
end;
s:=0
for i:=1 to 3 do
begin
if a[i] mod 2=0 then
s:=s+a[i]
end;
writeln(s);
readln();
end.
б) var a:array[1..3] of integer;
s, i: integer;
begin
for i:=1 to 3 do
begin
writeln('Vvedite chislo', i - );
readln(a[i]);
end;
s:=0
for i:=1 to 3 do
begin
if a[i]<0 then
write(a[i], ' ')
end;
readln();
end.
в) var a:array[1..3] of integer;
s, i: integer;
begin
for i:=1 to 3 do
begin
writeln('Vvedite chislo', i - );
readln(a[i]);
end;
s:=1
for i:=1 to 3 do
begin
if a[i] mod 3=0 then
s:=a[i]*a[i];
end;
writeln(s);
readln();
end.