1 дюйм = 2,54 см
По вертикали (сторона 38,1 / 2,54 = 15 дюймов) будет 15 * 600 точек, по горизонтали 15 * 1200 точек, всего 15 * 600 * 15 * 1200 = 162 000 000 точек.
На каждую точку отводится 24 бита = 3 байта, информационный объем файла 162 000 000 * 3 байт = 486 000 000 байт = 463,5 Мб
Program n1;
var k,m,n: integer;
begin
readln(k,m,n);
if (k mod 2<>0) and (m mod 2<>0) and (n mod 2<>0) then write('да') else write('нет');
end.
<h3>PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
Println(' ^~^ ');
Println('(`:'')');
Println('<###>');
Println(' / \ ');
Println('= = ')
end.
<h2>Можно Println заменить на Writeln</h2>
Учитывая, что там какой-то чел скинул программу на питоне третьем, то я тоже скину третьем питоне, только гораздо короче
n = int(input())
arr = [*map(int, input().split())]
for i in arr:
if i > 0:
print(i, end=' ')