Для записи текста использовался 65 - символьный алфавит. каждая страница содержит 30 строк по 45 символов в строке. какой объем информации содержит одна страница теста?
Var a:array[1..15] of integer; i,b: integer; begin b:=1; for i:=1 to 15 do readln(a[i]); for i:=1 to 15 do if a[i] mod 2 =0 then b:=b*a[i]; writeln(b); end.