1) var a,b: integer ;
begin
readln(a);
b:=(a mod 10)+(a div 10);
if ((b mod 7=0) and ((a div 10) mod 2 =0)) then writeln ('верно') else writeln ('не верно')
end.
2)var a,b,i: integer;
begin
readln(a);
for i:=1 to 3 do
if a mod 10 > 3 then begin b:=b+1; a:=a div 10; end;
if b=3 then writeln ('верно') else writeln ('не верно')
end.
3)var a,b,c,d,i: integer;
begin
readln (a);
b:= b+a mod 10;
d:= a div 10000;
b12:=b+d mod 10;
a:=a div 10;
for i:=1 to 3 do begin c:=c+a mod 10; a:=a div 10 end;
if c mod b =0 then writeln ('верно') else writeln ('не верно') ;
end.
Задание 2-Редакторы 3D-графики предназначены для создания моделей, анимации и целых фильмов.
Задание 3
Достоинства -
1-большие возможности
2-широкие возможности импорта/экспорта
3-возможность создания игр
4-небольшой размер
Недостатки
1-в базовую поставку не входит развёрнутая документация
2-нет возможности асинхронной подгрузки уровней
Задание 4
Этапы создания трехмерного изображения
Моделирование – построение математической 3д-модели общей сцены и ее объектов.
Текстурирование включает наложение текстур на созданные модели, настройка материалов и придание моделям реалистичности.
Настройка освещения.
Создание анимации (движущихся объектов).
1) 800 байт
2) 1310720 байт
Объяснение:
1)
N = 2^i
N₁ = 256 цветов
N₂ = 2 цвета
i₁ = 8 бит (256 = 2^8)
i₂ = 1 бит (2 = 2^1)
I = i * K
I₁ - I₂ = 700 байт = 700 * 8 = 5600 бит
K₁ = K₂ = K
8 * K - 1 * K = 5600
8K - K = 5600
7K = 5600
K = 800 точек
i₁ = 1 байт (8 бит = 1 байт)
I₁ = 1 * 800 = 800 байт
2)
N = 2^i
N = 256 цветов
i = 8 бит = 1 байт (256 = 2^8)
I = K * i
K = 4 * 256 * 5 * 256 = 1310720 точек
I = 1310720 * 1 = 1310720 байт