Может информатика?Информатика — это фундаментальная естественная наука, изучающая процессы передачи и обработки информации.
<span> ИНФОРМАТИКА - научная дисциплина, изучающая структуру и общие свойства научной информации, а также закономерности всех видов научной коммуникации. </span>
Begin
writeln('█████████████');
writeln('████ ████');
writeln('█████████████');
writeln('████ ████');
writeln('█████████████');
writeln('████ ████');
writeln('█████████████');
writeln('████ ████');
writeln('█████████████');
writeln('████ ████');
writeln('█████████████');
end.
var i,r,a:integer;
begin cls;
r:=0;
For i:=1 to 4 do
begin
read(a);
if a mod 2 = 0 then inc(r);
end;
writeln('chetnyh = ',r);
readln;
end.