Как показало исследование, узор является симпатичным, если в нем нигде не встречается квадрата
2х2 метра, полностью покрытого плитками одного цвета. на рисунке 1 показаны примеры различных
симпатичных узоров, а на рисунке 2 – несимпатичных.
для составления финансового плана директору необходимо узнать, сколько клиентов он сможет
обслужить, прежде чем симпатичные узоры данного размера закончатся. ему!
формат входных данных
на первой строке входного файла находятся два положительных целых числа, разделенные
пробелом - мим (15 м . n < 30 ).
формат выходных данных
выведите в выходной файл единственное число — количество различных симпатичных узоров,
которые можно выложить во дворе размера m x n. узоры, получающиеся друг из друга сдвигом,
поворотом или отражением считаются различными.
примеры:
f.out
f.in
14
22
322
33
begin
writeln('Введите количество часов в первом моменте времени');
readln(a);
writeln('Введите количество минут в первом моменте времени');
readln(b);
writeln('Введите количество секунд в первом моменте времени');
readln(c);
writeln('Введите количество часов во втором моменте времени');
readln(a1);
writeln('Введите количество минут во втором моменте времени');
readln(b1);
writeln('Введите количество секунд во втором моменте времени');
readln(c1);
s:=abs(a*3600+b*60+c-a1*3600-b1*60-c1);
writeln(s,' секунд');
end.
2)var a,b:integer;
s:real;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
if (a+b) mod 2 =0 then s:=a*b
else s:= a/b;
writeln(s);
end.
3)var b,s,n:real;
begin
writeln('Введите количество часов');
readln(n);
n:=n/3;
s:=2*power(2,(n-1));
writeln(s,' амёб');
end.
4)var a:array[1..7]of integer;
i:integer;
begin
for i:=1 to 7 do
begin
a[i]:=random(11);
writeln('a[',i,']= ',a[i]);
end;
end.