===== PascalABC.NET =====
begin
var f := CreateFile&<real>('MyFile.bin');
// создаем и заполняем файл
loop 10 do // файл на 10 чисел
Write(f, Random(100.0));
// ищем минимум и максимум
var (min, max) := (200.0, -100.0);
f.Seek(0);
var t: real;
while not f.Eof do
begin
Read(f, t);
if t > max then
max := t
else if t < min then
min := t;
end;
// дозапись в файл
Write(f, max);
Write(f, min);
// если надо - контрольный вывод
f.Seek(0);
while not f.Eof do
begin
Read(f,t);
Print(t)
end;
// закрыть файл
f.Close;
end.
Объяснение:
Основные отличия 2d от 3d
Главное отличие двух- и трёхмерной графики является её создания и отображения. Первый вид используется плоскую систему координат с двумя векторами, второй – объёмную, с тремя.
отличия 2д и 3д3d кино отличается от обычного по следующим критериям:
разные трансляции;
более сложное оборудование для воспроизведения;
яркие спецэффекты;
эффект присутствия;
необходимость наличия специальных очков.
Можно сказать, что эффект 3д в кино делает из обычного плоского изображения объёмное.
