Ответ:
5div12 = 0
5 mod 12 = 5
1327div div 10 = 132
Объяснение:
div - целочисленное деление
mod - остаток от целочисленного деления
<span>
</span>
<span>var a, k: integer;
begin
t:=0;
readln(a);
while a<>0 do begin
if (a mod 2 = 0) and (a mod 6 = 0) then
k := k + 1;
readln(a);</span>
<span> </span><span>end;
writeln(k)
end.</span>
Вторая часть задания:
ЗУБР & ТУТ (знак & обозначает, что поиск будет включать в себя эти оба слова).
ЗУБР | ТУР ( | означает, что в поиске в данном случае в запросе будет хотя-бы одно совпажение или точное)
Следовательно 18000+12000+5000=35000 тыс страниц будет найдено по ЗУБР | ТУР.
Var
i, n, m, j, max: integer;
ar: array[1..10000, 1..10000]of integer;
begin
randomize;
readln(n, m);
for i := 1 to n do
for j := 1 to m do
begin
ar[i, j] := random(1, 100);
if(i = 1) and (j = 1) then max := ar[1, 1];
if(ar[i, j] > max) then max := ar[i, j];
end;
writeln('Максимальный элемент:', max);
for i := 1 to n do
begin
for j := 1 to m do
write(ar[i, j]:4, ' ');
writeln;
end;
end.