Program room;uses crt;var a, b, h : integer; v, s, l, k : real;begin write('Введите длину, ширину и высоту комнаты : '); readln(a, b, h); l:= 10.5; k:= 0.5; v:= a * b * h; s:= l * k; writeln('Ответ : ',v/s :5:2);end.
Определим размер изображения 2362*3543=8368566 пикс.
Определим информационный объём файла 3*8368566=25105698 байт. Переведён в более крупную единицу: 25105698/1024=24517,28Кбайт
Ещё в более крупную: 24517,28/1024=23,98Мбайт. Можно округлить и получим 24 Мбайт
Var
m : array[1..4,1..4] of Integer;
m_new : array[1..4] of Integer;
i,j : Integer;
Begin
For i:=1 to 4 do
Begin
For j:=1 to 4 do
Begin
m[i,j]:=Random(100);
Write(m[i,j]:5);
If i=j then m_new[i]:=m[i,j];
end;
Writeln;
end;
Writeln('Главная диагнональ: ');
For i:=1 to 4 do Write(m_new[i]:5);
Writeln;
end.
Гордость, жадность, глупость, упрямство, тупость, неумение, выпендрежничество, и т.д
Вороство кода, дизайна , инновации да вообще плагиат ни на что, вроде как, не разделяется на отдельные понятия. Вообщем Плагиат - это вороство, однако того что запотентовано (принадледжит определённому человеку или компании)